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ПРЕДИСЛОВИЕ РЕДАКТОРА ПЕРЕВОДА 


На глазах одного поколения людей уже сменились три поко- 
ления вычислительных машин. Одновременно с увеличением мощ- 
ности машин росла и сложность решаемых задач. Программы, 
которые 20 лет назад относили к разряду серьезных (и даже 
научных) достижений, теперь сравнимы с заурядной курсовой 
работой. Программирование перестало быть делом одиночек, в 
реализации современных проектов участвуют порой сотни специа- 
листов. Взять хотя бы такие факты: на создание системы с разде- 
лением времени (Т55/360) было затрачено 2000 человеко-лет, 
за 5 лет разработки система претерпела 8 кардинальных реви- 
зий, причем в последней ее версии почти ничего не осталось от 
первой. 

В сложившихся условиях исключительно важное значение 
приобретают инженерные и организационные аспекты программи- 
рования. Однако в этом отношении выпускники высших учебных 
заведений недостаточно подготовлены. Они испытывают труд- 
ности в совместной работе с другими программистами, занятыми 
в проекте, не владеют техникой систематического тестирования 
написанной программы, плохо и несвоевременно ее документи- 
руют, не умеют писать структурные программы на неструктурном 
языке, не способны планировать работу и укладываться в гра- 
фик проекта. 

В США одним из важных этапов на пути решения этой пробле- 
мы стала разработка единых учебных планов (первый их вари- 
ант был опубликован в 1968 г., второй — десять лет спустя). 
Среди 8 основных курсов лекций, предусмотренных этими учеб- 
ными планами, два обязательных вводных курса. В первом из 
них рассматриваются основные понятия и изучается язык про- 
граммирования. Второй курс посвящен структурам данных, ме- 
тодам конструирования, отладки и тестирования программ. Этот. 
второй курс и составляет предмет настоящей книги. 

Для записи алгоритмов авторы использовали язык Фортран. 
Книга писалась в ту пору, когда еще не был утвержден новый 
стандарт — Фортран 77, и поэтому большинство примеров дается 
на Фортране ГУ (стандарт 1966 г.), лишь иногда применяются 
средства расширенного диалекта — \МАТЕТУ. В приложении 
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приводится перечень изменений, внесенных в язык Фортран 77, 
но этот перечень не полон и не совсем точен. Отсутствует, напри- 
мер, описание: новой системы ввода/вывода, не упоминается 
инструкция РАКАМЕТЕВ и т. д. 

Идеи структурного программирования невозможно проде- 
монстрировать на коротких примерах, поэтому в книге имеется 
много довольно пространных программ. Они являются неотъем- 
лемой частью текста (как формулы или выкладки в математи- 
ческом тексте), и при чтении книги их следует внимательно изу- 
чать. | 
Принято считать, что язык Фортран предназначен для реше- 
ния задач научного и инженерного характера. Однако в данном 
учебнике большинство примеров относится к управленческо- 
экономической области, т.е. к сфере «нечисленных» приложе- 
ний. Читатель, возможно, неожиданно для себя обнаружит, что 
и в этом случае Фортран оказывается вполне приемлемым и даже 
удобным инструментом. 

В заключение отметим, что в работе над переводом книги 
принимала участие Н. И. Вьюкова (гл. 5). 


Ю. Баяковский 


ПРЕДИСЛОВИЕ 


В книге представлен материал, который принято относить 
к курсу программирования второй ступени. В ней учтена боль- 
шая часть рекомендаций, содержащихся в пересмотренной учеб- 
ной программе АСМ 687). 

Авторы стремились собрать воедино материал, который поз- 
воляет начинающему программисту достичь профессионального 
уровня, а профессиональному программисту повысить свою ква- 
лификацию. Поэтому вначале обсуждаются понятия и принципы, 
а затем они иллюстрируются развернутыми примерами. Примеры 
отражают разнообразие стилей в конструировании и докумен- 
тировании программ. 

Для реализации алгоритмов используется язык Фортран. 
В книге описаны характерные особенности диалекта \УАТЕТУ, 
а также тех диалектов американского стандартного Фортрана ТУ 
(1966 г.), которые реализованы на машинах ВМ 360-370 и 
РЕС-10. Там, где это необходимо, отмечаются различия между 
Фортраном ГУ и новым стандартом — Фортраном 77. 

Книга может быть полезна как студентам, специализирую- 
щимся в области информатики (программирования), так и раз- 
личным пользователям ЭВМ. От читателей не требуется каких- 
либо специальных знаний, кроме тех навыков программирования 
на любом процедурно-ориентированном языке (не обязательно 
на Фортране), которые они приобрели, прослушав первый ввод- 
ный курс. 

Книга состоит из девяти глав и двух приложений. Главы 0 и 
| заменяют введение. В гл. О рассматриваются основы языка 
Фортран; этот материал используется в последующих главах. 
Материал изложен сжато; те, кто знаком с языком Фортран, мо- 
гут использовать эту главу как справочник, тот же, кто знает 
какой-либо другой процедурно-ориентированный язык, найдет 
в ней необходимые начальные сведения. В гл. | изучаются такие 
вопросы, как выбор алгоритма, разработка программы, стиль 
программирования, стандарты на документацию, методы от- 
Лладки и эксплуатации программ. 


1) Ассоциация вычислительной техники (Аззоса оп 1юг СотриНпвё Ма- 
сошегу). — Прим. ред. 
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В гл. 2—4 описаны более мощные средства языка Фортран. 
В гл. 2 речь идет о процедурах, при этом особое внимание уделено 
методам разделения данных. Глава 3 посвящена обработке `тек- 
стовой информации. В гл. 4 описаны организация и использова- 
ние магнитных лент и дисков, а также инструкции Фортрана для 
работы с указанными устройствами. Кроме того, мы знакомим 
читателей с некоторыми возможностями командных языков в 
операционных системах [ВМ 360-370 и РЕС-10. 

В примерах, содержащихся в гл. 0—4, используются струк- 
туры данных, которые естественным образом представляются 
простыми переменными и массивами. В гл. 5 приведены методы 
представления и обработки более сложных структур данных 
(связанных списков, стеков, очередей и деревьев). 

В гл. 6—8 рассматривается аппаратная и программная среда, 
в которой выполняется программа пользователя. В гл. 6 описано 
внутреннее представление данных в машине. Элементарные све- 
дения об организации машины содержатся в гл. 7. Наконец, в 
гл. 8 обсуждаются методы снижения стоимости разработки, экс- 
плуатации и выполнения программ. В частности, мы знакомим 
читателей с такими понятиями, как объектная колода, переме- 
щение программы, загрузка и оверлейные структуры. 

В приложении 1 перечислены встроенные функции большин- 
ства диалектов Фортрана. В приложении 2 отмечены особенности 
языка Фортран 77 по сравнению с языком Фортран [\, который 
изложен в различных главах этой книги, а по ходу изложения сде- 
ланы специальные пометки там, где в языках Фортран ПУ и 
Фортран 77 имеют место различия. Они прокомментированы в 
приложении. 

Приведенные в книге примеры намеренно отражают разнооб- 
разие стилей программирования. Использовано несколько раз- 
личных методов разработки алгоритма, конструирования про- 
граммы и ее документирования. Мы не считаем, что существует 
какой-то один стиль программирования, который во всех отно- 
шениях лучше, чем другие. Любой стиль имеет свои достоинства и 
свои сферы приложения. Хотелось бы, чтобы каждый програм- 
мист познакомился с различными приемами программирования, 
выделил наиболее интересные из них и разработал удобный для 
себя стиль. 

Мы хотим выразить признательность за многие полезные сове- 
ты, которые высказали Эл Девис, Билл Хайнес, Роберт Мак- 
Гаффи и рецензировавшие книгу Дж. Мэк Адамс, Фрэнк Прос- 
сер и Бен Шнейдерман. Мы хотим поблагодарить также многих 
студентов, которые проработали различные версии этого учеб- 
ника и чья критика улучшила настоящее издание. Наконец, мы 
хотим выразить наше признание и благодарность Джойс Марляр, 
которая мастерски напечатала большую часть рукописи. 
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Конечно, мы берем на себя ответственность за все оставшиеся 
незамеченными ошибки и упущения. 

Представленные в книге программы проверены на ЭВМ ВМ 
360 модели 65 в Вычислительном центре Университета штата 
Теннесси. Некоторые из них дополнительно проверены на ЭВМ 
РЕС-10 с процессором КЁ Университета штата Теннесси и на 
‚ ЭВМ ОЕС-10 с процессором КА, работающей на факультете ин- 
форматики Университета штата Огайо. 


Чарльз Е. Хьюз 
Чарльз П. Пфлигер 
Лоуренс „Л. Роуз 


Глава 0 


ПРЕДВАРИТЕЛЬНЫЕ СВЕДЕНИЯ 


0.1. Обзор 


Эта книга поможет вам стать по-настоящему грамотным про- 
граммистом. В ней на примерах разобраны те методы, которые 
применяют опытные программисты при решении своих задач. 
Изложение основано на языке Фортран, но многое из того, о 
чем вы узнаете в этой книге, применимо и к другим алгоритми- 
ческим языкам. Вы познакомитесь со многими аспектами вы- 
числений, не зависящими от языка программирования. 

По мере накопления опыта программисты приобретают свой 
«стиль», т.е. у них вырабатываются определенные привычки, 
проявляющиеся в структуре программы, ее докумёнтировании и 
т. д. Гл. | посвящена стилю программирования, но и по ходу 
всей книги мы будем отмечать особенности, присущие хорошему 
стилю. В гл. 2—4 рассмотрены такие вопросы, как использова- 
ние подпрограмм, обработка текстов, операции с устройствами 
ввода/вывода на магнитных лентах и дисках. В последующих 
главах вы познакомитесь со средой, в которой выполняются 
программы; в них также рассмотрены вопросы внутреннего 
представления данных, структуры ЭВМ и процесса выполнения 
программы. | 

Возможно, вы никогда не изучали Фортран или программиро- 
вали на нем много лет назад. Эта книга была задумана так, чтобы 
ее поняли все, кто имеет опыт программирования на каком-либо 
процедурно-ориентированном языке. Если вы знакомы с язы- 
ками ПЛ/1, Алгол, Паскаль или Кобол, вам не составит никако- 
го труда изучить Фортран. Вводная глава содержит материал, 
который вам потребуется в дальнейшем. Даже в том случае, 
если вы уже знаете Фортран, мы советуем прочесть эту главу, 
хотя бы для того, чтобы освежить материал в памяти и убедиться 
в том, что вы действительно знаете основы Фортрана. Описание 
каждой инструкции дано в виде завершенного подраздела и вы- 
делено на фоне остального текста так, чтобы такие подразделы 
можно было быстро найти. 

Язык Фортран описан в соответствии со стандартом Институ- 
та Американских национальных стандартов (сообщение Х3.9— 
1966). Позже был предложен новый стандарт языка, расширяю- 
щий его возможности; новая версия названа Фортран 77. Там, 
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где есть различия между этими двумя версиями языка, абзацы 
начинаются и заканчиваются черным кружочком; в приложении 2 
вы найдете описание этих отличий. | 

Некоторые особенности Фортрана зависят от типа ЭВМ и 
компилятора. В ряде компиляторов принята лишь часть стандар- 
та, в других — целиком весь стандарт Фортрана; есть и такие 
компиляторы, которые допускают расширения стандарта. Будем 
называть каждую комбинацию машины и компилятора диалек- 
том. Многие из приведенных примеров, зависящих от реализа- 
ции, основаны на двух широко распространенных диалектах: 
для машин [ВМ 360-370 с компилятором У\УАТЕПГУ и машин 
РЕС-10 с компилятором Фортран-10. 


0.2. Основные понятия и определения 


0.2.1. Запись инструкций Фортрана 


Программа на Фортране записывается в виде последователь- 
ности инструкций. Инструкции имеют фиксированный формат и 
вводятся в машину как записи; в каждой записи не более одной 
инструкции. Формат инструкций показан на перфокарте, 
рис. 0.1. Хотя в действительности ввод в ЭВМ происходит с 


МЕТКА Г ТЕЛО 


Ци , ИНСТРУКЦИИ 
КОММЕНТАРИИ 


5 7 72 73 8 


колонка 1 


Рис.0.1. Формат инструкций Фортрана. 


различных устройств, например с клавиатуры терминала, с пер- 
фоленты и др., мы будем говорить о входных записях как о пер- 
фокартах. 

Метка (или номер инструкции) Фортрана — это число, рас- 
положенное где угодно в пределах колонок с первой по пятую. 
Метками снабжают те инструкции, на которые есть ссылки в про- 
грамме. Другие инструкции программы записывают без меток. 

Гело инструкции перфорируют в колонках с 7 по 72. Для 
удобства чтения программы в тело инструкции можно вставлять 
пробелы. Компилятор их игнорирует (кроме пробелов внутри 
литерных данных, о чем будет сказано ниже). Тело инструкции 
может начинаться с любой, не обязательно с 7-й колонки. 

Если тело инструкции настолько длинно, что не умещается 
на одной перфокарте, инструкция может быть продолжена на 
следующей перфокарте. В этом случае пробивают любой, отлич- 
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ный от пробела или нуля символ в колонке продолжения (колон- 
ка 6) следующей перфокарты и продолжают инструкцию в ко- 
лонках с 7 по 72 этой карты. Если необходимо, инструкция может 
быть аналогично продолжена на следующие перфокарты. Одна 
инструкция может располагаться максимально на 20 перфокар- 
тах (19 карт продолжения). 

Колонки с 73 по 80 используют для нумерации последователь- 
ности перфокарт, но такая нумерация необязательна. Для неко- 
торых входных носителей, отличных от перфокарт, этого поля 
или совсем нет, или оно заполняется пользователем по его усмот- 
рению. Для больших программ в этом поле удобно пробивать 
номера, чтобы иметь возможность отсортировать входную коло- 
ду, если перфокарты будут перепутаны. 

® Колонку | используют для указания комментария. Лю- 
бая ката с буквой С в колонке | рассматривается как. коммента- 
рий и игнорируется компилятором. Комментарии позволяют 
идентифицировать программу, наглядно разделять ее на логиче- 
ские сегменты, объясняют назначение этих сегментов ® 


0.2.2. Типы данных 


Элементы данных Фортрана хранятся в словах фиксирован- 
ной длины. Слово памяти состоит из определенного числа дво- 
ичных разрядов (0 или 1), называемых битами. Слово в машинах 
[ВМ 360-370 состоит из 32 битов: слово машины ОЕС-10 имеет 
36 битов. Слово может содержать один или несколько элементов 
данных в зависимости от их типа; в некоторых ЭВМ для пред- 
ставления одного элемента данных используется несколько 
слов. Первые четыре типа данных в Фортране, с которыми мы 
познакомимся, это целые, вещественные, логические и литерные. 

Данные целого типа — это такие числа, у которых нет дроб- 
ной части. Под целой константой понимают последовательность 
из одной или более десятичных цифр без десятичной точки, ко- 
торой может предшествовать знак - или —. Примеры целых кон- 
стант: +2, —9695, 800000. 

Вещественные данные — это числа, которые могут содержать 
дробную часть. Вещественные константы представляются в 
двух формах: в виде последовательности десятичных цифр с де- 
сятичной точкой; в виде последовательности десятичных цифр 
(с десятичной точкой или без точки), за которой следует буква Е 
и целая константа. В обоих видах записи вещественной константе 
может предшествовать знак | или —. Примеры вещественных 
констант: |., +3.1416, —.483695 и +0.428Е?, —369Еб, 1.0Е—4. 
В последнем случае вещественные константы представлены в так 
называемой «научной нотации». Здесь. величина, следующая за 
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Е, показывает, в какую степень надо возвести число 10 перед ум- 
ножением на первую часть числа. Так, последние три примера 
представляют числа 42.8, —369000000., .0001. Форма представле- 
ния с порядком обычно применяется для записи очень больших 
или очень малых чисел. 

Логические данные могут принимать значения «истина» или 
«ложь»; константы, соответствующие этим значениям, записыва- 
ют в виде .ТКОИЕ. и .ЕАГЪЕ. 

® Литерные данные представляют собой последовательность 
букв, цифр, некоторых знаков и пробелов. Литерная констан- 
та — цепочка литер имеет вид иНсоп$, где п — целая констан- 
та без знака, указывающая длину (число литер) цепочки литер, 
а соп5# — цепочка из п литер после буквы Н. Примеры такого ти- 
па констант: 5НСРРО]! и 11НСАМ’Т $РЕГ... Во многих диалек- 
тах Фортрана цепочка литер литерной константы заключается в 
одиночные кавычки (апострофы). Внутри такой константы знак 
«апостроф» представляется двумя последовательными кавычками. 
Приведем два примера: '1ВМ 05$/360'’ и '1$М”Т ВАО’. Действия 
с литерными данными описаны в гл. 3. Мы будем использовать 
литерные константы только для записи заголовков при выводе 
информации ® 


Диапазон Диапазон Точность Число 
Тип ЭВМ целых чисел вещественных вещественных литер 

(в разрядах) чисел чисел (в разрядах) в слове 
Виггоцев$ 6700 12 10-46—10+869 11 8 
СОС 6000-7000 18 10-293 — [0+322 15 10 
РЕС-10 10 10-38—10+38 8 5 
[ВМ 360-370 9 10-78—10+75 7 4 
ОМГУАС 1108-1110 10 10-38—10+38 8 6 
ХЕКОХ $1ОМА 5-7 9 10-78—10+75 7 4 


Рис.0.2. Диапазон и точность чисел, представление литер. 


Диапазон значений, которые могут принимать данные указан- 
ных типов, зависит от размера слова конкретной вычислитель- 
ной машины. На рис. 0.2 показан диапазон значений, который 
могут принимать числа в некоторых распространенных машинах. 
Диапазон целых величин ий разрядов указывает, что допустимые 
в машине целые величины могут состоять не более, чем из п 
цифр. Значение показателя степени характеризует диапазон 
вещественных величин. Точность представления чисел в этих 
машинах определяется указанным на рис. 0.2 количеством де- 
сятичных разрядов. Число литер, которое может быть записано 
в машинном слове, зависит от способа хранения литерных дан- 
ных в оперативной памяти; об этом мы подробно поговорим в 
гл. 3. 
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Переменные в Фортране могут быть целыми, вещественными 
или логическими (Фортран 77, \МАТЁЕУ и многие другие диалек- 
ты допускают также литерные переменные). Тип переменной не 
изменяется во время выполнения программы. 

Именем переменной в Фортране может быть любая последова- 
тельность, содержащая от одной до шести букв или цифр, при- 
чем первой литерой в этой последовательности должна быть бук- 
ва. Так, ТОТАГ,, 1, ЗОМОЕХ и СОГ.72 — это правильно записан- 
ные имена переменных. Имя переменной в Фортране может иден- 
тифицировать простую переменную, элемент массива или мас- 
сив. Простая переменная используется для представления от- 
дельных величин и связана с одним словом памяти. 

Каждый элемент массива также представляет какую-то одну 
величину. Элементы массива обозначаются в Фортране с помощью 
индексов, располагаемых в скобках непосредственно после име-_ 
ни массива. Максимально массив переменных может быть трех- 
мерным, но в некоторых компиляторах допускаются массивы и 
больших размерностей. Если, например, КО\/’ЗОМ — одномер- 
ный массив (называемый также вектором) из 10 элементов, то 
шестой элемент обозначается как КО\МЗОМ (6). Индекс должен 
быть целым числом, меньше или равным объявленному макси- 
мальному количеству элементов массива. В Фортране каждый 
массив начинается с элемента с индексом «1»; индексы не могут 
быть отрицательными или принимать нулевое значение. Так, если 
[ — простая целая переменная, то КО\МЗОМ(Т), КО\М$ЗОМ 
(1-2), КО\МЗОМ (3=1-- 15) ит. д.— это правильное обращение к 
вектору КО\/ЗОМ; разумеется, при вычислении индекса резуль- 
тат должен быть не меньше | и не больше числа элементов массива. 

® Допускаемая сложность выражений для вычисления ин- 
декса зависит от компилятора. В ряде компиляторов для указа- 
ния значения индекса нельзя пользоваться выражениями, более 
сложными, чем целая константа без знака, умноженная на про- 
стую целую переменную плюс или минус целая константа без 
знака. В ряде других компиляторов для вычисления индекса 
допускаются любые целочисленные выражения. Необходимо 
знать ограничения, присущие компилятору, с которым вы ра- 
ботаете ® 

Имя массива ассоциируется с группой последовательно распо- 
ложенных слов (по одному на каждый элемент массива). Эле- 
менты массива хранятся в памяти по столбцам. Это означает, что 
в последовательных словах памяти вначале запоминаются эле- 
менты первого столбца, затем второго и т. д. На рис. 0.3 показано, 
как хранятся простые переменные Т, 7, КОЧМТ, МАХ, четыре 
элемента вектора ТОР и массив ЗОМ размером 3х2. 

Когда в программе происходит обращение к элементу масси- 
ва, вычисляется индекс и по его значению находится слово па- 
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мяти, связанное с данным элементом массива. Эта связь устанав- 
ливается с помощью формулы доступа и таблицы символов. Габ- 
лица символов — это таблица имен и связанных с ними адресов. 


Адрес определяет первое слово области, в кото- 
рой хранится переменная или массив с данным 


3 именем. 

ТОР (1) Формула доступа — это формула, позволяю- 
ТОР (2) щая установить, какое слово памяти связано с 
ТОР (3) данным элементом массива. Напомним, что в 
ТОР (4) Фортране каждый массив хранится в виде блока 
КОиМТ последовательных слов, и элементы массива рас- 
зим (1,1)}| | положены в памяти машины по столбцам. Так, 
зим (2,1 элемент А(К) и элемент А(]) разделяют (К— 1) 
$0 (3,1)| | слов. В двумерном массиве для того, чтобы оп- 
зим (1,2)| _ | ределить положение конкретного элемента мас- 
зим (2,2)| | сива, надо установить, сколько столбцов пред: 
зим (3,2)| — | шествуют столбцу, содержащему данный эле- 
МАХ мент, и затем подсчитать, сколько элементов в 


Рис. 0.3: Распо- 
ложение данных 
в памяти маши- 
НЫ: 


этом столбце предшествуют этому элементу. 
Если Х — это массив размером МХМ, то адрес 
элемента Х (1, Г), относительно начала массива 
Х определяется как 


Адр [Хх (1, 71= 9—1#М- 1—1) 


Таким образом, элемент Х (1, 7) находится 2 ячейке памяти, ко- 
торой предшествует число слов, занятых столбцами, предшест- 
вующими столбцу 1 (1—1 столбцов длиной М) плюс число слов, 
занятых элементами столбца Ф, предшествующими строке 1 
(1—1 элементов). 

При расположении в памяти многомерного массива по опи- 
санному выше принципу (первый индекс меняется быстрее вто- 
рого) вначале располагаются элементы первого измерения мас- 
сива (по столбцам), затем второго и т. д. Например, элементы 
массива У размером 2хХ3х2 будут расположены в памяти в сле- 
дующем порядке: У (1, 1, 1), У (2, 1, 1), У(1, 2, 1), У (2, 2, 1), 
У (1, 3, 1), У (2, 3, 1), У (1, 1, 2), У (2, 1, 2), У (1, 2, 2), У (2, 2, 2), 
У (1, 3, 2), У(2, 5, 2). При распределении памяти компилятор 
Фортрана использует декларированный размер массива, для 
того чтобы отвести ему соответствующее количество последова- 
тельных слов памяти. Во время выполнения программы как раз- 
мерность массива, так и максимальное число элементов массива 
остаются неизменными. Это связано с тем, что в реализациях 
Фортрана применяется стратегия статического распределения 
Памяти, при которой области памяти под массивы или простые 
переменные отводятся до выполнения программы и размеры этих 
областей не изменяютея во время выполнения: 
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0.2.3. Операции 


В Фортране приняты три категории операций: арифметиче- 
ские, логические и операции отношения. Арифметические опе- 
рации используются в вычислениях с целыми или вещественными 
величинами. Арифметические операции показаны на рис. 0.4. 


Знак операции Смысл 
№ж* возведение в степень 
-н, — плюс, минус 
% | умножение, деление 


—-, — сложение, вычитание 


Рис.0.4. Арифметические операции. 


Символ (+) означает возведение в степень (например, Х+=2 
означает Х в квадрате, или Х в степени 2). Символы плюс и 
минус указывают знак величины (например, 3.75 или—2) 
или отрицательное значение величины (например, —А). Четыре 
другие арифметические операции (*/ | —) общеизвестны. 

Операции отношения, показанные на рис. 0.5, используются 
для сравнения двух величин, которые могут быть переменными, 
константами или выражениями. С помощью этих операций мож- 
но проверить следующие условия: 


Знак операции Смысл 
СТ. меньше чем 
.ГЕ. меньше или равно 
СТ. больше чем 
‚СЕ. больше или равно 
.ЕО. равно 
.МЕ. не равно 


Рис.0.5. Операции отношения. 


Каждая операция отношения обозначается четырьмя литера- 
ми (включая точки). 
® Логические операции приведены на рис. 0.6. 


Знак операции Смысл 
.МОТ. логическое “не” 
.АХ. логическое “и” 
.ОЮ. логическое “или” 


Рис.0.6. Логические операции. 


Эти операции применяются для построения сложных логи- 
Ческих выражений. Логическое «не» отрицает значение логиче- 
ского выражения; две другие операции объединяют два логиче- 
ских выражения в одно составное логическое выражение ® 
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0.2.4. Выражения 


В Фортране различают два типа выражений: арифметические 
и логические. К арифметическим выражениям относятся: 
Целая или вещественная константа. 
Целая или вещественная переменная. 
Два арифметических выражения, связанные знаком ариф- 
метической операции. 
Арифметическое выражение, заключенное в скобки. 
Арифметическое выражение, которому предшествует знак 
-- или —. Заметим, однако, что два знака арифметических 
операций не должны стоять рядом, поэтому, например, 
«А умножить на минус 10» должно быть записано так: 


Ах (—10). 


Способ записи арифметических выражений близок к тому, 
который является общепринятым в математике. Скобки приме- 
няют для управления последовательностью выполнения операций, 
а также для выделения индексов в массивах. В арифметиче- 
ском выражении могут встречаться только вещественные перемен- 
ные и константы или только целые операнды либо комбинации 
вещественных и целых операндов. Результат вычисления ариф- 
метического выражения с однотипными операндами (все опе- 
ранды одного типа — только целые или только вещественные) 
определяется типом операндов в выражении. Однако выражения, 
содержащие и целые, и вещественные операнды (такие выраже- 
ния называют выражениями смешанного типа), дают в резуль- 
тате вычисления вещественное значение. Каждый раз, когда в 
выражении участвует вещественная величина, результат вы- 
числения — величина вещественного типа. 

Расположение скобок и приоритет операций управляют по- 
следовательностью вычислений в выражении. Следующие четыре 
правила определяют порядок, в соответствии с которым вычис- 
ляются арифметические выражения. 


ды фе 


1. Величины внутри скобок должны быть вычислены прежде, 
чем они могут участвовать в операциях совместно с какими- 
либо другими величинами вне скобок. 

2. Операции внутри арифметического выражения выполня- 
ются в порядке их приоритета: возведение в степень **, затем 
одноместные операции -- и —, далее умножение + и деление / 
и в последнюю очередь сложение -- и вычитание —. В этом же 
порядке операции перечислены на рис. 0.4. 

3. Вычисление выражений, имеющих операции одного при- 
оритета (кроме возведения в степень), производится слева на- 
право в порядке записи операций. 
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4. В выражениях, содержащих две последовательные опе- 
рации возведения в степень (например, Аз*В+»С), должны 
быть расставлены круглые скобки, определяющие порядок 
вычислений, поскольку порядок вычислений в такой ситуации 
не одинаков для различных компиляторов Фортрана. 


Примеры: Пусть ]=7 (целое), |=5 (целое), Х (6)=3 (вещест- 
венное). 


выражение результат тип 
(а) 1ж3.1 15.5 веществ. 
(6) 1-Х (1—1 2.0 веществ. 
(в) Т-- 1/2 *5 20 целый 
(г) —Х(1-Р1[)** 2/2 —4.5 веществ. 
(д) (Х (6) 1.0) = 4.0 16.0 веществ. 


В примерах (а) и (6) показаны арифметические выражения 
смешанного типа; результат вычисления этих выражений — 
вещественные величины. В примере (в) деление и умножение 
имеют более высокий приоритет, чем сложение, поэтому они 
выполняются первыми слева направо в соответствии с правилами 
2 иЗ: 7/2=3, 3+5=15, 5-+15=20 — конечный результат. За- 
метим, что деление двух целых дает в результате целое, а остаток 
от деления отбрасывается. Мы говорим, что в результате деления 
целого остаток иусекается: поэтому 7/2 равно 3. В примере (г) 
вначале выполняется операция возведения в степень (она имеет 
наивысший приоритет), за ней следует операция изменения зна- 
ка и наконец (последним) выполняется деление. Эти вычисления 
можно записать так: (—(3.*+*2))/2=—4.5. В примере (д) пока- 
зано, как применяются скобки для изменения порядка вычис- 
лений: здесь сложение выполняется раньше умножения: (3.- 1.)*4 
или 4.4. =6. | 

Теперь рассмотрим логические выражения Фортрана. К /ло- 
гическим выражениям относятся: 


1. Логическая константа. 

2. Логическая переменная. 

3. Два арифметических выражения, разделенные символом 
операции отношения. 

4.. Логическое выражение, заключенное в скобки. 

5. Логическое выражение, перед которым стоит символ ло- 
гической операции .МОТ. . 

6. Два логических выражения, разделенных символом ло- 
гической операции .АМО. или .ОЮ. 


Логические выражения вычисляются в следующем порядке: 


1. Части выражения, заключенные в скобки, вычисляются 
раньше тех частей, которые находятся вне скобок. 
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2. Любые арифметические выражения, входящие в состав 
логических выражений, вычисляются первыми. 

3. Операции отношения выполняются после арифметических 
операций (логические операции выполняются в послед- 
нюю очередь). 

4. Наконец, логические операции. выполняются слева на- 
право в порядке их приоритета: .МОТ., .АМО. и затем 
.ОК. . (Именно в таком порядке логические операции 
перечислены на рис. 0.6.) 


Примеры: Предположим, что логические переменные ОМ и А 
имеют соответственно значения .ТКОЕ. и .РАГЗЕ. и целая 
переменная [ имеет значение 5. 


выражение резильтат 
(а) 1. [Т.5 .БАГЗЕ. 
(6) Ом. АМО. .МОТ.А .ТВСЕ. 


(в) А.ОБ. (1.СЕ. 3) АХО. ОМ ТВОЕ. 


В примере (а) ТГ не меньше 5, поэтому результат .ЕАГЗЕ. . 
В соответствии с правилом 4 операция .МОТ. в примере (б) 
выполняется раньше .АМО. Первое вычисленное значение 
.МОТ. А дает ТВОЕ. ‚, а затем ОМ и (.МОТ. А), связанные 
логической операцией .АМО., дают в результате „ТВОЕ. 
В примере (в) по правилу | вначале вычисляется (Г.ОЕ. 3). 
Результат вычисления этого выражения ТВОЕ. . (Если даже 
опустить скобки, в соответствии с правилом 3 этот терм будет 
вычисляться первым.) Затем по правилу 4 выполняется операция 
(Г .ОЕ. 3) .АМО. ОМ, результат которой .ТКИЕ. . И наконец, 
А .ОК. (.ТКОЕ.) дает .ТКИЕ, . 


0.2.5. Условные обозначения 


Мы подошли теперь к тому, чтобы начать изучение основных 
инструкций языка Фортран. Запись инструкций должна точно 
соответствовать приведенным ниже описаниям вплоть до каждой 
прописной буквы и знака препинания. Части, выделенные кур- 
сивом, должны замещаться при написании программы конкрет- 
ным содержанием. В квадратные скобки заключаются элементы 
инструкции, которые могут быть опущены. В самих инструк- 
циях квадратные скобки, конечно, отсутствуют. Например, ус- 
ловная запись | | 


[метка] ТЕ (лог-выр) инстр 
указывает, что инструкция может содержать метку, обязательно 


содержит ключевое слово №, за которым в круглых скобках 
следует элемент лог-выр и далее инстр. Обозначения метка, 
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лог-выр и инстр будут объяснены позднее при описании ин- 
струкций. | 

Пробелы в инструкции компилятор Фортрана игнорирует, за 
исключением пробелов внутри литерных констант. Поэтому 
советуем вам при записи инструкций свободно пользоваться 
пробелами везде, где они позволяют сделать программу более 
удобной для чтения. 


0.3. Неисполняемые инструкции 


Большинство инструкций в программе, написанной на Форт- 
ране, относится к типу исполняемых инструкций. Это означает, 
что такие инструкции преобразуются в машинные команды и 
вызывают определенные действия в ЭВМ во время выполнения 
программы. Другой класс составляют неисполняемые инструкции 
Фортрана. Они не транслируются в машинные команды, а только 
обеспечивают необходимую информацию для компилятора во 
время трансляции. В данном разделе рассмотрены неисполня- 
емые инструкции Фортрана. 


0.3.1. Декларации 


Рассмотрим первый вид неисполняемых инструкций Форт- 
рана — так называемые инструкции описания, или декларации. 
Они управляют типом, размерностью, начальным значением и 
размещением переменных внутри программы. В этой главе 
будут описаны неисполняемые инструкции О МЕМЗ!ОМ, КЕАГ, 
[МТЕОСЕК, ГОЗСАГ, 1МРЫСТ и РАТА. Инструкция ЕОТ]- 
УАГЕМСЕ описана в гл. |, инструкции СОММОМ и функции- 
формулы — в гл. 2. Декларации должны находиться в самом 
начале программы (или подпрограммы; см. разд. 0.7), так как 
они определяют способ интерпретации компилятором следующих 
за ними исполняемых инструкций. 

В начале программы необходимо указать максимальное зна- 
чение каждого индекса массива, используемого в программе. 
Если размерность переменной не указана, переменная класси- 
фицируется как простая (безындексная). Размерность массива 
не может изменяться во время выполнения программы. Размер- 
ность массива можно задать с помощью инструкции ОИМЕМЗ1ОМ: 


О1МЕМЗ!ОМ список 


где список — последовательность индексируемых переменных, 
разделенных запятыми. 

Пример: 
РМЕМЗЮМ Х(10), $0М (2, 3), ТОР (5) 
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Действие: Эта декларация резервирует 10 слов для вектора Х, 
6 слов (2+3) для двумерного массива ЗОМ и 5 слов для век- 
тора ТОР. 


Примечания: 


1. В программе может быть несколько деклараций О МЕМ$]- 


2. Число измерений, разрешенных для массива, зависит от 
компилятора. 

3. Индексы должны быть целыми константами и соответ- 

ствовать максимальному значению для каждого измерения. 

Каждое имя массива должно быть единственным в про- 

грамме, т, е. им можно пользоваться только для ссылок на 

данный массив. 


„> 


® Как мы уже видели, переменные могут быть целыми, ве- 
щественными или логическими. Тип переменной должен быть 
указан компилятору Фортрана, чтобы в объектной программе 
можно было правильно интерпретировать двоичные данные в 
слове, связанном с переменной. Если программист не объявил 
тип переменной, компилятор принимает тип в соответствии с 
первой буквой имени переменной. Следующие три декларации 
служат в Фортране для явного указания типа переменной ® 

КЕАЁ спис-перем 


|МТЕОСЕВ спис-перем 
ГОСТСАГ, спис-перем 


где спис-перем — список переменных — это имена простых пере- 
менных, массивов и функций, разделенных запятыми. (В не- 
которых компиляторах в декларациях типа переменных раз- 
решается задавать информацию о размерности. В этом случае 
указанные в спис-перем индексированные переменные содер- 
жат индексы, обозначающие размерности.) 


Пример: 
КЕАГ Х, КОЧМТ, КОМ (6) 


Действие: эта декларация объявляет переменные Х, КООМТ 
и КО\М/ вещественными и КО\/ линейным массивом из шести 
элементов. 


Примечания: 


1. В программе может быть несколько деклараций ЮЕАГ, 
[МТЕОСЕК или ГОССАСГ. 

2. Имя переменной может появиться лишь однажды, в ка- 
кой-либо одной декларации типа. 

3. В качестве индексов могут быть заданы только целые 
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константы. Они должны представлять максимальное зна- 
чение индекса в соответствующем измерении. 

4. Если размерность массива указана в инструкции описания 
типа, то массив можно уже не упоминать в декларации 
О! МЕМЗЮМ. Однако можно имя массива без индексов 
указать в декларации типа, а его размерности задать в 
декларации О МЕМЗ1ОМ. 

5. Декларации типа переменных относятся к классу неис- 
полняемых инструкций и должны предшествовать в про- 
грамме всем исполняемым инструкциям. 

6. Подразумеваемый (по умолчанию) тип: если переменная 
не описана в декларациях типа, то тип такой переменной 
определяется по первой букве ее имени: переменные, 
имена которых начинаются с букв Т, Ф, К, [., М или М, 
считаются целыми, все остальные неописанные перемен- 
ные — вещественными. 

Другим средством, с помощью которого может быть объявлен 
тип переменных, служит инструкция ПМРЫСТ — отсутствую- 
щая в ряде диалектов. В инструкции 1МРЫСТ указывается 
тип и диапазон букв. В отсутствие других деклараций типа 
переменных все переменные, имена которых начинаются с букв 
в указанном диапазоне, будут относиться к этому типу. Неявно 
определенный тип переменной может быть переопределен для 
отдельных переменных посредством деклараций КЕАГ,, 1ПМТЕСЕВ 
или ГОС!САГ. Декларация ПГМРЫСГТ имеет следующий вид: 


МРГ СМТ тип (диапазон 1 [, диапазон 2,...]) 


где тип — это какой-либо тип, т.е. ВКЕАГ, ПМТЕОСЕВЮ или 
ГОС]1САГ. 
Каждый диапазон — это или одиночные буквы, или пары 
букв, разделенные дефисом. 


Пример: 
МРЫСТ ТМТЕСЕК (С — РБ, Н- К, 2) 


Действие: Любые переменные, имена которых начинаются с 
букв С, О, Н, Г, Х, К или Д, объявляются целыми перемен- 
НЫМИ. | 


Примечания: 


1. Декларация МРЕЫСГТ должна предшествовать в про- 
грамме любым другим декларациям. 

2. Подразумеваемые (по умолчанию) типы переменных мо- 
гут быть изменены для отдельных переменных с помощью 
явных Деклараций КЕАГ, ПМТЕСЕВ или ГОССАЕГ. 

3. Инструкция [МРЫСГТ расширяет диапазон неявного 
описания переменных по первым буквам. В приведенном 
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выше примере переменные, начинающиеся с букв [.,, 
М или М, будут целыми по умолчанию (переменные, на- 
чинающиеся с букв в диапазоне с [Г по М, считаются це- 
лыми при отсутствии явных деклараций). 


Обычно, когда ячейка памяти отводится для переменной, 
содержимое этой ячейки неизвестно, и поэтому мы считаем, что 
переменная не определена программистом. Однако мы можем 
определить начальное значение, присваиваемое переменной, с 
помощью инструкции РАТА. 


РАТА спис-перем 1 /значения 1/ [,спис-перем 2/ значения 2/,...] 
Здесь каждый спис-перем — это список простых переменных 
или элементов массива; в некоторых диалектах Фортрана в 
списке допускается также использование массивов. 

® Значения — это константа или последовательность кон- 
стант, разделенных запятыми. Эти значения присваиваются 
переменным в предшествующем спис-перем. Запись пжзначе- 
ние, где п — некоторая целая константа, означает, что ука- 
занное значение должно быть повторено п раз ® 


Пример: 


|МТЕСЕВ ТОР, К, 1 
КЕДТ, Х (3, 2), У (10, 20) 
ДАТА ТОР /5/, Х /3+1., 3+10./, К, 1/0. 1/, У 6, 2) /13/ 


Действие: Инструкция РАТА присваивает переменной ТОР 
значение 5; элементам массива Х значения 1., 1., 1., 10., 
10., 10.; переменным К и Г. значения 0 и | соответственно; 
элементу У (5, 2) значение 13. 


Примечания: 


1. Если в списке переменных инструкции РАТА указано 
имя массива, то подразумеваются сразу все элементы 
массива. 

2. Должно быть соответствие один к одному между эле- 

_ ментами списка и константами, указанными в списке 
значений. 

3. Соответствие между переменными и их значениями 
устанавливается порядком их записи слева направо. 
Если в списке переменных указано имя массива, то его 
индивидуальным элементам присваиваются значения в 
порядке расположения элементов массива в памяти 
(т. е. по столбцам). 

® 4. Тип каждой переменной и связанное с переменной 
начальное значение должны соответствовать друг другу, 
за исключением литерных констант, которые могут 
быть присвоены переменным любого типа ® 
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5. Инструкция РАТА должна следовать в программе 
после всех деклараций размерности и типа. 

6. Инструкция присваивает только начальные значения 
перед выполнением программы. Если в ходе выполнения 
значение переменной изменяется, оно не может быть 
восстановлено посредством инструкции РАТА. 

7. В программе можно использовать несколько инструк- 
ций ОАТА. 

8. Начальное значение любой переменной, которая не 
упоминалась в инструкции ОАТА, не определено. 


В некоторых реализациях Фортрана установку начальных 
значений данных можно делать в декларациях типа перемен- 
ных. В этом случае тип, размерность и начальные значения 
переменных могут быть объявлены с помощью одной декларации. 
Например, 


ПУТЕСЕВ 1/0/, 11$Т (5, 2) /5+0,5=1/ 


объявляет Ги 1 5Т целыми. Г — простая переменная с началь- 
ным значением 0; в массиве [.1$Т размером 5=2 первому столбцу 
присвоены начальные значения 0, второму столбцу — единицы. 


0.3.2. Инструкция ЕМО 


Инструкция ЕМО указывает на окончание последовательно- 
сти инструкций главной программы или подпрограммы. Она 
записывается как 


ЕКО 


т.е. как одиночное ЕМО, и должна физически быть послед- 
ней инструкцией программы. 


Пример: 
ЕМРО 


Действие: Завершает компиляцию главной программы или под- 
программы. 


Примечания: 


1. В программе или подпрограмме должна быть только одна 

инструкция ЕМО. 

2. Инструкция ЕМО должна быть последней в каждой про- 
грамме или подпрограмме. 

3. Инструкция неисполняемая, у нее не может быть метки. 


На этом мы завершаем обзор некоторых основных неиспол- 
няемых инструкций Фортрана. Инструкция ЕОЮКМАТ будет 
объяснена в разд. 0.5.4, а другие неисполняемые инструкции — 
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в последующих главах. Мы перейдем теперь к изучению испол- 
няемых инструкций Фортрана. Вначале рассмотрим, как при- 
сваивать значения переменным и выполнять ввод и вывод; затем 
в разд. 0.6 опишем инструкции локального управления после- 
довательностью действий. И наконец, в разд. 0.7 перейдем к 
изучению подпрограмм Фортрана. 


0.4. Инструкция присваивания 


Инструкция присваивания заменяет старое значение перемен- 
ной на значение некоторого выражения. Инструкция Фортрана 
А=В означает, что значение переменной В пересылается в ячейку 
памяти, занимаемую переменной А. Эта операция интерпрети- 
руется как «присвоить данное значение В переменной А», а вовсе 
не «А равно В». Так, последовательность инструкций 

А=5 

В=8 

А=В 


присваивает переменным А и В значение 8. Старое значение А 
(5 для данного примера) теряется. Инструкция присваивания 
имеет следующие формы записи: 


[метка] имя-арифм-перем.=арифм-выраж. 
ИЛИ 
[метка] имя-логич-перем.=логич-выраж. 
где метка — это номер инструкции; 


имя-арифм-перем.— имя целой или вещественной простой 


переменной; 
имя-логич-перем. — имя простой логической переменной или 
элемент массива; 
арифм-выраж. —— арифметическое выражение; 
логич-выраж. — логическое выражение. 


Пример: 
10 КООМТ=2.7 (1—1) 
Г 1$Т (3)=1.1$Т (3)--1 
20 ОМ=1.1$Т ().ЕТ.КООМТ 
УАГОЕ=т5Т (КООМТ)*=И2 — 115Т (1) 
30 1.1$Т (2+1-—1)=1$Т (КООМТ—2)=11$Т (1) 


Действие: 


В каждой инструкции присваивания вычисляется выра- 
жение, стоящее справа от знака равенства, и это значение 
заменяет значение переменной в левой части инструкции. 
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Примечания: 


1. К моменту выполнения инструкции присваивания каждая 
переменная, находящаяся в правой части, должна иметь 
соответствующее значение. 

2. Тип результата вычисления выражения (целый или веще- 
ственный) в арифм-выраж. преобразуется к типу имя- 
арифм-перем., если они отличны друг от друга. 

3. В левой части инструкции присваивания может быть 
только одна переменная. | 


Обратимся к инструкциям присваивания, приведенным в 
примере. Пусть к моменту выполнения инструкции 10 перемен- 
ные имели следующие значения: 


КООМТ 14 целое 
11$Т(3) 6 целое 
[.1$Т(5) 4 целое 

ОМ .ТРОЕ. = логическое 
УАГОЕ 15.3 вещественное 
1 3 целое 


В инструкции с меткой 10 вычисление выражения 2.7х2 
дает 5.4, и это значение должно быть присвоено переменной 
КОЧ\МТ. Но так как КООМТ должна быть целой, усечение дроб- 
ной части приводит к тому, что переменной КООМТ присваивает- 
ся значение 5 (см. 2-е примечание). В следующей инструкции 
6--1, т. е. 7, присваивается элементу ЕТЗТ (3). Таким образом, 
Ы$Т (3) изменяет свое значение с 6 на 7. В инструкции с меткой 
20 вычисление логического выражения в правой части дает ре- 
зультат .РАГЗЕ., так как значение КООМТ равно теперь 5, 
а [1$Т (3) имеет значение 7. Поэтому значение КАГЗЕ. присва- 
ивается переменной ОМ. В следующей инструкции вычисляется 
выражение ((4*»3)/2)—7=25. Но так как УАШОЕ — веществен- 
ная переменная, ей присваивается значение 25.0. В инструкции 
с меткой 30 элементу массива Г.Т$Т (5) присваивается значение 
77=49. 

После выполнения пяти инструкций присваивания простые 
переменные и элементы массива принимают следующие значения: 


КОПМТ 5 ОМ „ЕАТЗЕ. 
.15Т(3) 7 УАГОЕ 25.0 
Г15Т(5) 49 1 3 


и 


0.5. Инструкции ввода/вывода 


В этом разделе мы рассмотрим инструкции ввода и вывода, 
или, сокращенно, инструкции В/В. Значения данных, вводимых 
инструкцией ввода КЕАО, присваиваются переменным, список 
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которых программист указывает в самой инструкции ВЕАО. С по- 
пощью инструкций вывода \УКТЕ и РКПУТ можно, например, 
выводить текущие значения переменных на устройство печати, 

® В некоторых диалектах Фортрана (например, \УАТЕТУ) 
допустим бесформатный ввод/вывод. В этом случае программисту 
не нужно точно задавать позиции данных в записи. При формат- 
ном вводе/выводе с помощью формата программист точно опреде- 
ляет форму каждой записи ® 

Форматным В/В можно пользоваться во всех реализациях 
Фортрана. 


0.5.1. Списки переменных для ввода и вывода 


Начнем со структуры списка переменных в инструкциях вво- 
да и вывода. 


в-в-список может обозначать: 


|1) спис-перем 
2) в-в-список, в-в-список 
3) (в-в-список, цел-перем-нач, конечн [.приращ]) 


где спис-перем — список простых переменных, элементов мас- 
сива, имен массивов. 
ц2л-перем — неиндексированная целая переменная. нач, ко- 
нечн и прираш — целые константы или простые целые пере: 
менные, значение каждой из них больше нуля. По умолчанию 
принято приращение (если оно опущено), равное [. 


Простая переменная или элемент массива в в-6-списке ука- 
зывает, что вводится или выводится одиночная величина. Если 
же в 6-в-списке задано имя массива без индекса, то оно представ- 
ляет все элементы массива в памяти (упорядоченные по столбцам). 
В третьей форме в-в-списка используется конструкция неявного 
цикла, сходная с инструкцией цикла ОО. (Инструкция РО под- 
робно описана в разд. 0.6.4.) Эта форма в-в-списка особенно удоб- 
на при составлении списков переменных и элементов массивов 
данных. В неявном цикле элементы в-в-списка генерируются с по- 
мощью цел-перем, которой вначале присваивается начальное зна- 
чение, и затем при каждом повторении оно увеличивается на 
шаг приращения, пока не достигнет конечного значения. Так, 
неявный цикл (У(2*[—1), Х (Т), 1[=3, 8, 2) компилятор Фортра- 
на заменит списком У (5), Х (3), У (9), Х (5), У (13), Х (7). Значе- 
ние цел-перем Т, равное 9, превышает конечное значение индекса. 
Поэтому компилятор «вычисляет» (У (2*[1—1), Х (Т)) только для Г, 
равного 3, 5, Т, ив результате создает список из 6 переменных, 
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ри —- 


Пример 

Список: П редставляет: 
(а) ОМ, ТОО, И] ОМ, ТОР(|), 
(6) (Х(О, 1=3,5) Х(3), Х(4), Х(5) 
(в) ((У(К, 1), к 1,5), = 1,М) \(1,1), У(2,1), 


), У(3,0, ..., Уб,1, 
У(1,2), У(2,2), ..., У(5,М) | 


0.5.2. Бесформатный ввод 


Бесформатный ввод, допускаемый диалектом \УАТЕПУ и дру- 
гими диалектами Фортрана, особенно удобен для начинающих 
программистов. При бесформатном вводе не нужно указывать 
колонки перфокарты, в которых расположены данные. Данные 
располагаются в любых позициях перфокарты, элементы данных 
отделяются один от другого пробелами и/или запятыми. Приве- 
дем структуру инструкции бесформатного ввода КЕАШ: 


[метка] КЕАО, в-в-список 
ИЛИ 
[метка] ВКЕАО (устр-ввода,*|,ЕМО-выход]) в-в-список 


где метка и в-в-список были описаны выше; 
устр-ввода — целая константа или переменная, указывающая 
номер устройства ввода; 
*х означает, что данные вводятся без формата; 
выход — номер (метка) исполняемой инструкции. 


Примеры 
(а) ВЕАЮ, 1, ТОР, (11ЗТ (7), 1=1, 5, 2) 
(6) ВЕЛР (5, *, ЕМО=99) 1, ТОР, (1.15Т (3), 3=1, 5, 2] 


— Карта с данными 


Действие: (для приведенных примеров): ввод пяти чисел с пер- 
фокарты и присваивание их по порядку переменным списка: 


Г ТОР 141$Т (1) 9 1.15 (5) 
13 20.3 20 40 
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Примечания: 


1. При каждом исполнении инструкции КЕАРО вводится одна 
перфокарта. 

2. Данные при вводе без формата могут располагаться в лю- 
бом месте перфокарты и отделяются друг от друга запяты- 
ми и/или пробелами. 

3. Каждое входное значение должно согласовываться по типу 
с переменной, которой оно присваивается при вводе. 

4. Инструкция КЕАРО вводит лишь столько значений, сколь- 
ко их указано в 6в-в-списке, остальные данные игнорируются. 
Если требуется ввести больше чисел, чем помещается на од- 
ной перфокарте, вводится следующая карта, и так до тех 
пор, пока не будут выбраны все элементы данных, указан- 
ные в 6-6-списке, или пока не будут исчерпаны все перфо- 
карты. 

5. Значение устр-ввода зависит от реализации языка. Для 
устройства ввода с перфокарт машин ВМ 360-370 с ком- 
пилятором \УАТУЙЕ устр-ввода=Ъ5. 

6. Когда считаны все перфокарты, а инструкция КЕАО тре- 
бует ввода, регистрируется ошибка В/В и выполнение 
программы прекращается, если не задано значение вы- 
ход для ЕМО. Е\ХО)=выход передает управление на инст- 
рукцию с меткой выход. 


0.5.3. Бесформатный вывод 


Вывод без формата осуществляет инструкция РВТ\УТ. Подоб- 
но бесформатной инструкции КЕАО, эта инструкция полезна 
для начинающих программистов, так как при ее использовании 
не нужно точно задавать позиции в печатаемой строке. Инструк- 
ция РВ МТ также очень полезна при отладке программ, поскольку 
позволяет выводить данные на отдельных стадиях вычислений. 
Инструкция РЕГМУТ имеет вид 


®е [метка] РЮ\Т, выв-список 


где метка — метка инструкции, а выв-список — список, имею- 
щий ту же форму, что и в-в-список, но, кроме простых пере- 
менных, элементов и имен массивов, он может содержать кон- 
станты и выражения ® | 


Пример 


РЕ1МТ, Т, (Х(2), 1=1, 9), $0М, ’=ТОТАГ! 
где 1=3 Х(1)=30. Х (2)=87.2 ЗОМ= 117.2 
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Действие: печатается такая строка: 
3 0.300000 Е 02 0.872000 Е 02 0.1172000 Е 03=ТОТАБЬ 


Примечания: 


1. При выполнении каждой инструкции РКИМТ печать на 
АЦПУ начинается следующей по порядку строки. 

2. Если для вывода значений из выв-списка требуется более 
одной строки, печать автоматически переходит на следую- 
щую строку. 

3. Целые числа выводятся на печать, выравненные по пра- 
вому краю (в столбцах); нули, предшествующие значащей 
цифре, подавляются. | 

4. Вещественные числа обычно печатаются в формате Е (по- 
рядок-мантисса). 

5. Все величины выводятся в порядке их расположения в вы8- 
списке. 


0.5.4. Инструкция ЕГОКМАТ и форматный 
ввод ‘вывод 


Как уже говорилось, бесформатный ввод/вывод удобен для 
начинающих программистов. Однако при программировании 
сложных задач очень важно уметь располагать данные в опре- 
деленных позициях печатной страницы, точно задавать позиции 
входных данных на перфокарте для считывания их по программе. 
При вводе некоторые колонки перфокарты иногда нужно игнори- 
ровать, а при выводе —- разделять данные пробелами. Для того 
чтобы это сделать, необходимо точное управление форматами 
ввода и вывода данных. 

При фэрматном вводе/выводе данные точно располагаются 
в соответствии с форматом. Запись — это последовательность 
полей, и инструкция ЕОКМАТ попросту задает структуру полей 
в записи. Инструкция ЕОКМАТ неисполняемая, она определяет 
позицию, размер и тип данных в записи. Каждое поле содержит 
значение отдельного элемента данных. Инструкция ЕОКМАТ име- 
ет следующий вид: 


метка ЕОКМАТ (формат список) 


Здесь метка — обязательный элемент инструкции; 
формат список — последовательность из одного или более 
кодов формата, разделенных запятыми. Основные коды фор- 
мата '): 


1) С остальными форматами можно познакомиться в руководствах по 
Фортрану. 
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Ниже используются такие обозначения: п, ши 4 должны быть 
целыми константами без знака; п можно опустить, в этом случае 
предполагается, что п=1. 


п : п целых чисел с шириной поля ш.. 
пЕх.4: п десятичных (вещественных) чисел с шириной поля 
ш, 4 — число цифр после десятичной точки. 
пЕю.4: п вещественных чисел с порядком, ширина &, 4 — число 
цифр после десятичной точки. 
пА\ : п буквенно-цифровых цепочек, каждая из которых со- 
держит ш литер. | 
Н цепочка-из-и-литер: литеральное *) поле, состоящее из 
ш литер, непосредственно следующих за Н. 
‘любая-цепочка’: литеральное поле (допускается не во всех 
диалектах Фортрана). 
пХ : п игнорируемых позиций во входной записи или п про- 
| белов на выводе. 
Та : пропуск до колонки с номером и (принят не во всех ди- 
алектах Фортрана). 
/: конец текущей записи (строки или перфокарты). 
п (формат список): п — кратное повторение группы кодов 
формата, заключенной в скобки. 


Пример: 
100 ЕОВМАТ (5Х, 12, Е6б.2, 2(3Х, А4)) 


Действие: Инструкция ЕОКМАТ определяет семь начальных 
полей записи, как показано на рисунке. 


5 10 15 20 25 30... 


5Х 12 [6,2 3Х Аф ЗХ 44 


Примечания: 

1. Инструкция ЕОКМАТ не обязательно должна описывать 
всю запись целиком. | 

2. К инструкции ЕОКМАТ можно обращаться в различных 
инструкциях ввода/вывода. 

3. Поля литеральных констант (спецификация Н и цепочки, 
заключенные в кавычки) обычно используют только для 
вывода информации. 


*) Речь идет о литералах Фортрана, т. е. о величинах, заданных своим 
значением; их не следует путать с «литерами», т. е. буквенно-цифровыми сим- 
волами. Литералом может быть числовая константа или цепочка литер.— 
Прим. ред. 
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4. Инструкция ЕОЕМАТ может быть помещена в любом месте 
программы. Эта инструкция неисполняемая. 

5. Если все коды формата в инструкции ЕОКМАТ выбраны, 
но еще остались переменные в соответствующих списках 
инструкций КЕАР или \!КТЕ, то начинается обработка 
следующей записи. При этом повторно используется груп- 
па кодов формата, относящаяся к последней закрывающей- 
ся скобке (но не к скобке, которая закрывает весь список 
форматов). Если же вложенной повторяемой группы кодов 
нет, то повторно используется весь формат. 


0.5.5. Форматный ввод 


Для форматного ввода используется инструкция КЕАО, ко- 
торая в этом случае имеет следующий вид: 


[метка] ВКЕАО (устр-ввода, формат [, ЕМО-выход]) в-в-список 


где: метка — метка инструкции; 
устр-ввода — целое число, указывающее номер устройства 
ввода; 
‘формат — метка соответствующей инструкции ЕОКМАТ; 
выход — метка исполняемой инструкции (не во всех диалек- 
тах можно использовать подпараметр ЕМО=); 
в-в-список —список, определсние которого дано в разд. 0.5.1. 


Пример: 


КЕДР (5, 101, ЕМО=50) 1, ТОР, (11$Т(1), 1=1, 5, 3) 
101 РОВМАТ (12, ‘4Х, ЕБ.1, зх, 12)) 


Номер колонки 1 ‹. 


Действие: Ввести с перфокарты пять значений в соответствии 
с инструкцией ЕОКМАТ с меткой 101. В том случае, если 
встретится признак конца данных, управление передать на 
инструкцию с меткой 50. В данном примере переменным 
в списке в-в-список будут присвоены следующие значения: 


| 13 
ТОР — —20.3 
ГУТ(1) 20 
1.15Т(3) 0 
1.1$Т(5) 40 


Примечания: 


1. При каждом выполнении инструкции КЕАО будет вводить- 
ся новая запись. 


2 № 2043 
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2. Значения присваиваются переменным списка в соответствии 
с инструкцией ЕОКМАТ, метка которой указана в данной 
инструкции КЕАШО. 

3. Каждое вводимое значение должно быть согласовано с ко- 

дом формата и с типом переменной, которой оно присваи- 

вается. Исключение здесь составляет только код формата 

А. В этом случае вводимые значения могут присваиваться 

любым переменным. 

Пробелы в числовых полях интерпретируются как нули. 

Значение устр-ввода зависит от реализации. Для машин 

ВМ 360-370 устр-ввода=5 — устройство ввода с перфо- 

карт; для машин ОЕС-10 устр-ввода=2 — устройство вво- 

да с перфокарт и устр-ввода=5 — ввод с терминала. 


бл > 


Рассмотрим теперь два примера использования инструкции 
форматного ввода КЕАР для того, чтобы проиллюстрировать ее 
связь с инструкцией ЕОКМАТ при вводе данных с перфокарт. 
Пример 1: Ввод целых чисел 


ТМТЕСЕК 11$Т1(50)., М 
100 РОВМАТ (16(13, 2Х)) 


Номер колонки 1 


—_— 
№=4 ху 32 ха х230 ХС- 0 


В этом примере первое число на перфокарте (4) присваивается 
переменной №. Последующие числа присваиваются первым М 
элементам массива Е]$Т. Заметим, что знак входит как часть 
поля, отводимого для М. Так как пробелы при вводе соответст- 
вуют нулям, целые числа должны занимать строго определенные 
позиции на перфокарте. В инструкции ЕОКМАТ содержится 
больше полей (16 целых полей), чем на карте с данными. Это не 
будет ошибкой. При выполнении инструкции КЕАО не обяза- 
тельно использовать все поля инструкции ЕОКМАТ. Формат 
обычно записывают с учетом максимального числа элементов 
данных, которые могут быть в записи; например, для перфокарты 
можно записать 1018 или 8110. 
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Пример 2: Ввод данных разных типов 


ВЕ. У(10} 

ТИТЕСЕВ 106, КОИМТ 

ВЕАО (5,101) гос, КоОмт, (У(Т), 1=1, 4) 
101 ЕРОВМАТ (215 / 3(Е4.1,1Х)) 


106 бо ки ТЕ уток =0456 \(3)=-12,3 Ув 


В этом случае будут считаны три перфокарты, так как формат 
описывает только пять полей, а затребовано шесть чисел. С пер- 
вой перфокарты вводятся значения переменных ГОС и КООМТ. 
Разделитель / указывает на окончание первой записи (перфокарты). 
Далее по формату Е4.1 будут считаны значения со второй карты. 
После чтения второй карты вновь используется последняя пов- 
торяемая группа кодов формата для считывания следующей пер- 
фокарты. Последнее поле Е4.1 вводится с третьей карты. Заметим, 
что десятичная точка, находящаяся в какой-либо позиции поля, 
остается в этой же позиции и во введенной величине (реальное 
положение точки имеет приоритет по сравнению с тем, что ука- 
зано в инструкции ЕОКМАТ). Число без десятичной точки будет 
преобразовано в соответствии со спецификацией формата (будет 
выставлена десятичная точка «на расстоянии» 4 цифр от правого 
конца числа). Знак и десятичная точка, если они пробиты на 
перфокарте, занимают по одной позиции. 

Советуем вам использовать подпараметр ЕМО. Он позволяет 
сигнализировать о завершении отдельной фазы выполнения 
программы. Если признак конца данных оказался неожиданным, 
можно вывести сообщение вместе со значениями наиболее важ- 
ных переменных и остановить выполнение программы. 


0.5.6. Форматный вывод 


В этом разделе мы дадим определение форматного вывода, 
который выполняется с помощью инструкции \УКТЕ. 


[метка] \УЮТТЕ (устр-выв, формат) [в-в-список] 


где: метка — номер инструкции; 
устр-выв — целая константа или переменная, определяющая 
устройство вывода; 


формат — метка соответствующей инструкции РОКМАТ; 
® 6в-6-список — необязательный элемент инструкции ® 


Пример: Пусть ВМАХ и $ОМ — вещественные переменные, зна- 
чения которых —13.2 и 183.765 соответственьо. 


2* 
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\КТТЕ (6, 100) КМАХ, 50М 


100 ЕОКМАТ ('ВМАХ=,, Е7.2, 5Х, "'ТОТАГ 1$$’, Еб.2) 


Действие: Выводится следующая строка: 
КМАХ=— 13.20 ТОТАГ 1$ $183.77. 


Примечания: 


|. 


3. 


8. 
9. 


Если устр-выв определяет АЦПУ, первая литера выводи- 


‚ мой на печать строки управляет подачей бумаги. Эта лите- 


ра называется символом управления и не печатается. К сим- 
волам управления относятся: '--’ печатать на той же самой 
строке, °’ пропустить одну строку, ’0’ пропустить две 
строки и ’1’ перейти на новую страницу. 


. Значение устр-выв зависит от реализации. Для машин 


ВМ 360-370 устр-выв=6 — это АЦПУ; для машин 
РЕС-10 устр-выв=3 — это АЦПУ и устр-выв=5 — вывод 
на терминал. 

Тип каждой выводимой переменной должен быть согласо- 
ван с кодом соответствующего формата, за исключением 
кода А. В формате А могут быть выведены данные любого 
типа. 


. Вещественные числа округляются, если соответствующие 


поля в формате имеют меньше цифр после десятичной точ- 
ки, чем в представлении чисел. 

Каждому элементу данных должно соответствовать поле 
в формате. 


. Знак минус (и десятичная точка в полях типа Е или Е) зас- 


читывается в ширине и. | 

С помощью формата не может быть выдана на печать запись 
длиннее максимального размера, принятого для данного 
печатающего устройства. Типичные максимальные разме- 
ры выводимых на печать записей — 12] или 133 литеры 
(длина строки). На терминалы можно выводить записи 
длиной 72 или 80 литер. На перфокарте обычно распола- 
гается не более 80 литер. В формате, конечно, может быть 
определено несколько записей. 

Код пХ вызывает появление в выводимой записи ий пробе- 
ЛОВ. 

Литерные данные (коды Ах, пН или литералы) выравнива- 
ются в выходной записи по левому краю поля; целые и 
вещественные величины выравниваются по правому краю 
поля (нули, предшествующие первой значащей цифре, не 
печатаются). 


Приведенный ниже пример показывает типичное применение 
инструкции ЕОКМАТ для вывода. В этой инструкции ЕОКМАТ 
используется косая черта, которая служит для указания конца 
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записи, и группа повторений внутри формата. Предположим, что 
мы хотели бы вывести на печать, начиная с новой страницы, ин- 
формацию, расположенную следующим образом: 


% & ЗОММААУ ВЕРОВТ % * 
# ВООСНТ: 53 й 500: 138 РАОР1Т: 31390.50 
РААТ # $тоСкК ТОТАЕ = 141 


13 
28 

о 
50 
18 
32 


мым 


где ВОЧОНТ, ОГО и ТОТАГ — простые целые переменные, 
ЭТОСК' — массив целых чисел размера № и РКОЕ!Т — простая 
вещественная переменная. 


УВТТЕ (6,1007 ВОИСНТ, $00 РВОЕТТ, ТОТАЕ, (Т, 5ТОСК( = 
100 РОАМАТ (°1',15Х, ++ * У ММАВУ РЕРОВТ % ', ии” ОСЕР» ТМ 

1 5х. '# вОубНТ: #, 1%, 5%. #8 $0%0:, 14, 7Х, "РАСЕТТ: $', ЕТ.2ил 

2 Т12, °РАВТ #', 10Х, *5ТОСК', 5х 'ТОТАЕ = 1, 16/ 

3 112, *'-—--- *, 10Х, "—-—и/ 


% (112, 14, 2х, 10х, 14) ) 


ЕОЮКМАТ с меткой 100 определяет 12 записей, которые выводятся 
на печать в 10 строках. Последняя группа формата определяет 
только два возможных поля (код 14), и поэтому она используется 
шесть раз для вывода 12 величин. Каждый раз поле Т12 вызыва- 
ет перемещение на одну строку, так как первый символ в выводи- 
мой на печать строке (он не печатается) — это знак пробела. 

На этом мы заканчиваем обсуждение инструкций ввода/вы- 
вода Фортрана с использованием перфокарт, терминала и печа- 
тающего устройства. В гл. 4 вы познакомитесь с другими устрой- 
ствами ввода/вывода, такими, как магнитные ленты и магнит- 
ные диски, вы узнаете также о формах представления данных 
на этих устройствах. 


0.6. Инструкции локального управления последовательностью 
действий 


Программист, разумеется, может управлять порядком выпол- 
нения инструкций в программе. Обычно инструкции выполняются 
последовательно одна за другой. Программист может изменить 
этот порядок с помощью инструкций прекращения выполнения 
(ЭТОР), безусловного перехода (@О ТО), условного перехода 
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(ТЕ) и инструкции цикла (РО). В данном разделе мы рассмотрим 
эти инструкции, которые позволяют программисту управлять пос- 
ледовательностью выполнения инструкций. 


0.6.1. Прекращение выполнения программы 


Выполнение программы может быть остановлено в любое вре- 
мя с помощью инструкции 5ТОР: 


[метка] ЗТОР 
где метка — номер инструкции. 


Пример: 
15 ТОР 


Действие: Выполнение этой инструкции в любом месте програм- 


мы или подпрограммы вызывает прекращение работы програм- 
МЫ. 


Примечание: В программе может быть произвольное число инст- 
рукций ТОР. 


0.6.2. Безусловный переход 


Команды передачи управления Фортрана дают возможность 
изменять естественную последовательность выполнения инструк- 
ций. Здесь мы приведем две инструкции, которые осуществляют 
безусловную передачу управления. Наиболее простая форма 
безусловного перехода в Фортране — это инструкция @О ТО 
следующего вида: 


[метка П СО ТО метка 2 | 
где метка | и метка 2— номера инструкций. 


Пример: 
СО ТО 5 


Действие: Управление передается на инструкцию с меткой 5. 
Примечания: 


1. метка 2 должна быть номером (меткой) исполняемой инст- 
рукции в той же главной программе или подпрограмме, 
в которой находится инструкция СО ТО. 

2. Слова ОО ТО и метку в инструкции для удобства чтения 
и во избежание путаницы следует разделять пробелами. 
Некоторые замечания о структуре программы и свойствах 
использования инструкции СО ТО приведены в гл. 1, 
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Более гибким средством безусловной передачи управления 

является вычисляемый переход (О ТО. Во время выполнения про- 

граммы значение целой переменной определяет, на какую метку 

из списка меток надо передать управление. Вычисляемый СО 
ТО имеет следующий вид: 


[метка 0] СО ТО (метка 1, метка 2, ..., метка п), цел-перем 


где: метка 0 — номер инструкции СО ТО; метка 1, метка 2 
и т. д.— номера исполняемых инструкций в той же главной 
программе или подпрограмме, что и инструкция СО ТО; 
® цел-перем — простая целая переменная ® 


Пример: 
СО ТО (10, 2, 15, 15), К 


Действие: Если К==|, перейти к инструкции с номером 10; при 
К=2— к инструкции с номером 2; при К=3 или 4— к инст- 
рукции с номером 15. 


Примечание. Если вычисляемый СО ТО содержит список из п 
меток, то величина цел-перем должна лежать в интервале от 
| до п. 


0.6.3. Условные переходы 


Инструкции условного перехода дают возможность програм- 
мисту выбирать условия, в соответствии с которыми происходит 
передача управления на ту или иную инструкцию программы. 
Существует две формы инструкций Е условного перехода Форт- 
рана: арифметический и логический переходы. Арифметический 
условный переход [Е содержит арифметическое условие, на осно- 
вании которого происходит передача управления. Инструкция 
имеет вид 


[метка] Е (арифм-выр) отриц, нулев, полож 


где метка — метка инструкции 1[Е; 
арифм-выр — арифметическое выражение; 
отриц, нулев и полож — метки инструкций, на которые пере- 
дается управление в зависимости от значения арифм-выр. 


Пример: 
ТЕ (Х/2—А) 3, 5, 4 


Действие: Вычислить (Х/2—А) и передать управление инструк- 
ции с меткой 3, если результат вычисления арифметического 
выражения отрицательный; инструкции с меткой 5, если ре- 
зультат нулевой; инструкции с меткой 4, если он положи- 
тельный. 
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Хотя арифметическое выражение в инструкции [Е может быть 
сколь угодно сложным, обычно используют простые выражения. 
Допускаются арифметические выражения любого типа; однако 
следует быть осторожным при применении выражений веществен- 
ного типа. В результате ошибки округления вещественной ве- 
личины она может оказаться не равной в точности нулю, даже 
если истинное значение арифм-выр равно нулю. В связи с этим 
может произойти передача управления на метки полож или от- 
риц, в то время как ожидалась передача управления на метку 
нулев. 

Другая инструкция условного перехода — логическая инст- 
рукция [Е. Она позволяет установить более сложные условия, 
чем арифметическая инструкция [Ё, но может передать управле- 
ния только по двум направлениям, в то время как арифметиче- 
ская инструкция Е может передавать управление по трем нап- 
равлениям. (Надо сказать, однако, что передача управления по 
трем направлениям в программировании используется сравни- 
тельно редко.) Логическую инструкцию 1Ё не обязательно при- 
менять для передачи управления: она может вызывать считыва- 
ние перфокарты, печать строки, присваивания или останов. Ос- 
новное преимущество логической инструкции К по сравнению 
с арифметической состоит в том, что она более наглядна. 


[метка] ТЕ (логич-выр) инстр 


где метка — номер инструкции 1Е; 
логич-выв — логическое выражение; 
инстр — любая исполняемая инструкция (именно инструк- 
ция, а не метка), кроме арифметического условного перехода 
ТЕ или инструкции цикла ОО. 


Пример: 
Е (А СТ. 10.0 60 ТО 32 


Действие: Если А больше 10.0, передать управление инструкции 
с меткой 32; в противном случае выполнить следующую по 
порядку инструкцию. 


Примечания: 
1. Если значение логич-выр .ТКОЕ., то выполняется инстр. 
2. Если инстр не СО ТО, ТОР или КЕТОКМ, то вслед за 
инстр будет выполняться инструкция, непосредственно 
следующая за Г". В том случае, если не соблюдено условие 
для выполнения инстр (т. е. значение логич-выр=.ЕАТ.-- 
5Е.), управление сразу будет передано на инструкцию, 
непосредственно следующую за инструкцией 1Е. 
Приведем еще один пример использования логической инст- 
рукции Е. Допустим, что требуется заменить каждый элемент 
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п-элементного массива Х его абсолютным значением и затем рас- 
печатать весь массив. 
т=1 
2 ТЕ ХТ) «СТ. 0.) ХЕТ) = ХТ) 
РАТМТ, Х(Т) 
1 = 1+1 
1Е (1 „Е. №) 60 ТО 2 


Заметим, что независимо от значения (истина или ложь) ло- 
гического выражения в инструкции с меткой 2 РКИ\Т будет вы- 
полняться для каждого значения [ в интервале от | по М. 


0.6.4. Инструкции цикла 


Фортран располагает мощным средством, с помощью которого 
можно несколько раз повторить ту или иную последовательность 
инструкций. Так как повторение или «циклы» в программирова- 
нии применяются очень широко, существует инструкция, спе- 
циально предназначенная для организации циклов. Это инструк- 
ция ОО. Она имеет вид 


‚ [метка] ОО инстр цел-пер = нач-зн, кон-зн [лаг] 


где метка — номер данной инструкции; 
инстр — номер (метка) исполняемой инструкции, на которой 
заканчивается цикл ОО; 
цел-пер — простая целая переменная, называемая индексом 
цикла ОО; 
® НаЧ-ЗН, КОН-ЗН и шаг — также простые целые переменные 
или целые константы, каждая из которых больше нуля ® 


Пример: 
РО 32 1=1 10, 2 


Действие: Выполнить инструкции, расположенные от инструк- 
ции ОО по инструкцию с меткой 32 включительно пять раз 
со значениями [, равными 1, 3, 5, 7, 9. 


Примечания: 


1. Цикл РО выполняется как минимум один раз. 
® 2. Значения цел-пер, нач-зн, кон-зн и шага не должны изме- 

няться программой внутри цикла ПО ® 

3. Из цикла ОО может быть передано управление. Управле- 
ние можно также передать от инструкции внутри цикла 
к другой инструкции внутри цикла; однако от инструк- 
ции, расположенной вне цикла РО, может быть пере- 
дано управление только в начало цикла. Передавать 
управление извне внутрь цикла РО не разрешается. 
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4. Роль инструкции с меткой инстр не могут играть: ТОР, 
ОО ТО, ВЕТОКВМ (см. разд. 0.7.4), логическая [Е в соче- 
тании с любой из этих инструкций, инструкция ОО или 
арифметическая инструкция 1Ё. 

5. Циклы ОО могут быть вложенными один в другой, т. е. 
все инструкции каждого внутреннего цикла должны укла- 
дываться внутри внешнего цикла. (Два или более цикла РО 
могут иметь одну и ту же метку инстр последней выпол- 
няемой инструкции.) 

6. По умолчанию принято, т. е. если шаг опущен, что шаг ра- 
вен |. 


Возможно, лучший способ объяснить цикл ОО — это проде- 
монстрировать его работу на примере. На рис. 0.7 показан при- 


мер цикла ОО и эквивалентная структура без использования цик- 
ла ОО. 


_ 20 32 1 м 1,10,2 * | 1=1 _ «з=НАЧ-ЗНАЧ 


| ТОР = ТОР + 1 _ 5 ТОР = ТОР +т 
Х(17 = ХИ) + 1 ХТ) = Х(11 +1 
32 РАМТ» Х(1) РАТМТ» Х(Т} 


Т = 1+2 .<==ШАГ 
_/ ЗЕ ОЕ 60 То 5 <» ПРОВЕР-УСЛ 


Рис.0.7. Действие инструкции ОО. 


Перейдем теперь к изучению инструкции СОМТ1 МОЕ. Эта 
инструкция может иметь метку. Сама по себе она не выполняет 
каких-либо действий. Чаще всего СОМТГМОЕ — последняя ин- 
струкция (инстр) цикла. 


[метка] СОМТ1МОЕ 
где метка — номер данной инструкции. 


Пример: 
20 СОМТГХОЕ 


Действие: Никакого; эта инструкция не вызывает никаких дей- 
ствий. Она содержит метку 20, на которую можно передавать 
управление. 


Примечание: Чаще всего используется в качестве последней 
в цикле РО. Встретив СОМТПХОЕ в такой роли, компилятор 
генерирует команды приращения и проверки индекса цикла. 
Выполнение инструкции СОМТТМИЕ как бы приводит к при- 
ращению счетчика цикла и к очередному выполнению тела 
цикла. 
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Перейдем теперь к рассмотрению более сложного примера 
с циклом РО. Пусть два линейных массива (вектора) имеют раз- 
меры М и М соответственно. Наша задача — напечатать каждый 
положительный элемент массива Х, который содержится в мас- 
сиве У, и список ячеек памяти, в которых находятся значения Х, 
появляющиеся также и в У. 


ОВ 10 Тт=1\ 1 
ОЗ (О) Е. о 60 ТВ 10 
00 204=1, 
28 ТЕ 641} „Е. м 31 РАТМТ+ "МАТСН'» Х(1}› "АТ 3='; 3 
10 СОМТ1МУЕ 


(Здесь ”МАТСН” — текст, ‚ означающий 
«соответствует», и ’АТ ]=’ означает «при ]=».) 


В данном примере инструкция СОМТИМОЕ с меткой 19 — 
последняя инструкция цикла. Мы не можем закончить цикл пре- 
дыдущей инструкцией, так как, если элемент массива Х меньше 
или равен нулю, его необходимо игнорировать и нужно просмат- 
ривать следующий. Поэтому нам следует пропустить второй цикл 
полностью. Заметим, что во внутреннем цикле используется дру- 
гой индекс (У), поскольку внешний индекс (Г) не может быть из- 
менен во внутреннем цикле. Внутренний цикл можно также запи- 
сать в виде 


00 20 4} = 
ТЕ И а. У(/)} РАМТ, 'МАТСН!, Х(Т), ЗАТ =, 3 


20 СОМТТМОЕ 


Применение инструкции СОМТИМИЕ для окончания цикла 
РО предпочтительно, поскольку она точно отмечает конец цикла. 
В дальнейшем мы всегда будем использовать ее в этой роли. 

В последнем примере данного раздела показано, как можно 
использовать значение индекса после выхода из цикла ОО. Пред- 
положим, что мы хотели бы ввести перфокарты с данными и за- 
тем остановиться, когда перфокарты окончились или когда было 
считано 100 перфокарт. Данные, считанные с перфокарт, за- 
носятся в массив Х, и затем, используя переменную МСАКО$ — 
фактическое число считанных перфокарт, выведем на печать число 
элементов массива Х, превышающих значение Х (МСАКО5$). Пол- 
ная программа, выполняющая это задание показана на рис. 0.8. 

Программа поясняется комментариями, вставленными в тело 
каждого цикла РО. Как мы установили ранее, инструкции 
ЕОКМАТ могут быть расположены в любом месте программы. 
В данном примере мы решили поместить все инструкции ЕОК МАТ 
непосредственно перед инструкцией ЕМО. Параметр ЕМО = метка 
в инструкции КЕАО передает управление инструкции с меткой 15 
в том случае, если введены все перфокарты. Индекс МСАЮО$ 
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необходимо уменьшить на | для указания действительного числа 
элементов массива, определенного в цикле ввода. Значение ин- 
декса РО уже не потребуется, если завершилось требуемое число 
повторений, т. е. цикл окончился нормально. В этом случае окон- 
чательное значение индекса зависит от компилятора. Наконец, 
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Рис.0.8. Использование индекса цикла после выхода из цикла. 

(В инструкции 101: ’’ИЗ’, 'ВВЕДЕННЫХ ЧИСЕЛ’, 'ПРЕВЫШАЮТ ПО- 
СЛЕДНЕЕ ЗНАЧЕНИЕ’; в инсгрукции 102; '.ж«ОШИБКА: ТОЛЬКО’, 
'ВВЕДЕННЫХ ЧИСЕЛ ... ОСТАНОВ +++’) 


инструкция |", расположенная за инструкцией с меткой 15, 
обеспечивает, чтобы цикл ОО не выполнялся второй раз, если 
было введено недостаточное количество чисел. Без этой инструк- 
ции во время второго прохода цикла ОО программа выполнялась 
бы неверно из-за конечного значения МСАКО5$, равного нулю. 


0.7. Подпрограммы 


0.7.1. Введение 


Подпрограммы служат важным средством для написания на 
Фортране сложных программ. При правильном использовании 
подпрограмм существенно легче писать, отлаживать, документи- 
ровать программы. Такие программы удобнее в эксплуатации. 
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О роли подпрограмм в модульных структурах мы поговорим 
в гл. [. В данном разделе мы рассмотрим только технику постро- 
ения самих подпрограмм. 

Подпрограмма — это независимый программный блок. Под- 
программы во многом схожи с главными программами, которые 
уже были нами описаны. Подпрограммы и главные программы об- 
разуют программные единицы или программные модули. Мы го- 
ворим: подпрограмма вызывается из другого программного моду- 
ля. Во время вызова подпрограммы управление передается из 
вызывающей программы (или подпрограммы) в вызываемую 
подпрограмму. После этого начинается выполнение подпрограм- 
мы, состоящей из обычных инструкций Фортрана, таких, как ин- 
струкции присваивания, передачи управления (Е, @О ТО, ОО) 
и ввода/вывода. Подпрограммы, могут также вызывать другие 
подпрограммы, декларировать тип данных, резервировать память 
и задавать начальные значения с помощью инструкций КЕАЕ, 
[МТЕСЕВ, ГОССАГ, РГМЕМУОМ, [МРЕС!Т и РАЛА. В ка- 
кой-то момент времени вызванная подпрограмма передает уп- 
равление обратно в вызывающий программный модуль. Это оз- 
начает, что управление будет передано на инструкцию, непосред- 
ственно следующую за той инструкцией, из которой произошел 
вызов подпрограммы. (В гл. 2 будет показано, что управление 
может быть передано и другим инструкциям вызывающей про- 
граммы.) | 

Все программные модули компилируются независимо; это 
означает, что взаимосвязи между метками инструкций или име- 
нами переменных в двух программных модулях нет. Таким обра- 
зом, имя К, например, или номер инструкции 10 можно исполь- 
зовать в нескольких программных модулях без всяких опасений. 

Передача данных (параметров) между программными модуля- 
ми происходит не по имени, так как нет взаимосвязи между дву- 
мя, даже одинаковыми именами в различных программных моду- 
лях. Существует три способа обмена информации между вызываю- 
щей и вызываемой программами. Первый способ применяется 
в подпрограммах-функциях, которые возвращают одно-единст- 
венное арифметическое или логическое значение. Этот способ 
обеспечивает только одностороннюю связь: из подпрограммы- 
функции к вызывающей ее программе. Двухсторонняя связь воз- 
можна с помощью списка параметров, т. е. ряда значений и пере- 
менных, которые вызывающая программа передает подпрограмме 
в момент вызова. Подпрограмма может использовать эти значения 
для вычислений и присваивать результаты переданным ей пе- 
ременным. В момент возврата, вызывающий программный мо- 
дуль получает доступ к результатам, которые подпрограмма при- 
своила этим переменным. Третий способ позволяет разделять одни 
и те же данные между двумя программными модулями. Он основан 
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на применении инструкции СОММОМ. В этом случае переменные, 
которые были описаны в инструкции СОММОМ, хранятся в об- 
ласти памяти, доступной любому программному модулю. В дан- 
ном разделе мы проанализируем только два первых способа свя- 
зи между программными модулями, т. е. передачу результата 
как значения функции и обмен данными при использовании спи- 
сков параметров; инструкция СОММОМ будет рассмотрена в 
разд. 2.6. 


0.7.2. Списки параметров 


Как было сказано выше, список параметров — это последова- 
тельность значений и переменных, передаваемых между програм- 
мными модулями. Список параметров состоит из одного или не- 
скольких элементов, разделенных запятыми; список заключен 
в круглые скобки. Элементами списка параметров могут быть 
константы, простые переменные, выражения, имена массивов и 
элементы массивов. Список параметров в вызывающей програм- 
ме называется списком фактических параметров, поскольку при 
обращении к подпрограмме ей передаются фактические значения 
и переменные. 

Подпрограмма должна содержать аналогический список, на- 
зываемый списком формальных параметров. Этот список состоит 
только из простых переменных и имен массивов. Поскольку имена 
в различных программных модулях не связаны между собой, 
между списками формальных и фактических параметров устанав- 
ливается позиционное соответствие: первый фактический пара- 
метр связывается с первым формальным параметром и т. д. (Не- 
редко для наглядности программы и удобства работы с ней в обо- 
их списках параметров записывают одинаковые имена. Следует, 
однако, помнить, что связь между формальными и фактическими 
параметрами определяется их позициями в списках, а не их име- 
нами.) Формальные переменные являются лишь «представлением» 
тех фактических переменных и значений, которые заменят их 
при обращении к подпрограмме. Каждое изменение формального 
параметра, например, инструкцией присваивания или инструк- 
цией ВЕАО имеет тот же эффект, что и изменение соответствую- 
щего фактического параметра. 

В связи с тем что формальный параметр является только пред- 
ставлением фактического параметра, они должны быть совмести- 
мыми. Мы называем это согласованием параметров. Формальные 
и фактические параметры должны быть согласованы в следующих 
аспектах. 


По типу: каждый фактический параметр должен быть того же 
типа, что и соответствующий ему формальный параметр. 
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По роду: каждому одиночному элементу данных (константе, 
простой переменной или выражению) в списке формальных па- 
раметров должна соответствовать простая переменная. Элементу 
массива в списке фактических параметров обычно соответствует 
простая переменная в списке формальных параметров; но ему 
может также соответствовать имя массива в списке формальных 
параметров. В этом последнем случае с передаваемым элементом 
массива и всеми его последующими элементами будут сопостав- 
ляться первый, второй и т. д. элементы массива в списке формаль- 
ных параметров. 


По размерности: поскольку при обращении к элементам мас* 
сива применяется формула доступа, массив в списке фактических 
параметров должен иметь ту же размерность, что и массив в спис- 
ке формальных параметров. Исключение представляет лишь одно- 
мерный массив, или вектор, в котором размерность. «формаль- 
ного» массива может быть меньше размерности «фактического» 
массива. Фактические размеры массива могут быть также пере- 
даны в качестве параметров. 


По количеству: количество элементов в списках фактических 
и формальных параметров должно совпадать. 


Существует две разновидности подпрограмм: подпрограммы 
типа РОМСТТОМ (далее функции) и подпрограммы типа ЗИОВЮО- 
ОТТМЕ (далее подпрограммы). Они отличаются друг от друга 
как способом вызова, так и способом возвращения результатов. 

Функции обычно возвращают только одно арифметическое или 
логическое значение. Для вызова функции используется ее имя, 
за которым в скобках указывается список формальных парамет- 
ров. Функция выступает в качестве терма в арифметическом или 
логическом выражении. Результат вычисления функции подстав- 
ляется как значение этого терма и участвует в дальнейших вы- 
числениях совместно с другими термами этого выражения. Вызов 
функции (или обращение к функции) имеет следующую форму: 

имя (спис-парам) 


где имя — имя функции; 
спис-парам — список простых переменных, элементов мас- 
сивов, констант или выражений; 
все вместе — терм арифметического или логического выра- 
жения. 


Пример: 
КЕАГ Р, ВС 
Р=5.0 
аКО$$=В1а (Р, —1.75) 
Действие: Переменной СКО$$ присваивается значение, вычислен- 
ное функцией ВТО с фактическими параметрами Р и — 1.75, 
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0.7.3. Встроенные функции 


Ряд функций широко используется в решении многих задач. 
К ним относится вычисление квадратного корня, синуса и коси- 
нуса, логарифма, абсолютного значения и т. д. Программы ДлЯ 
вычисления этих функций входят в качестве составной части 
в большинство компиляторов Фортрана, поэтому такие функции 
называют встроенными. Мы включили в приложение | таблицу 
‚ наиболее употребительных встроенных функций. Обратите внима- 
ние на указанные в таблице типы параметров. При обращении 
к каждой функции следите за тем, чтобы параметры были тре- 
буемых типов. На этом мы заканчиваем рассмотрение математи- 
ческих функций, поскольку их применение довольно очевидно. 
Остановимся, однако, на некоторых функциях иного рода. 

Прежде всего обратимся к функциям ЕГОАТ и ПХ. Эти 
функции позволяют изменить тип выражения так, чтобы он от- 
личался от типа его аргументов. Функция ЕГОАТ возвращает 
вещественное число, эквивалентное значению ее целого парамет- 
ра. Функция ТЕХ возвращает целое число, эквивалентное зна- 
чению ее вещественного параметра с усеченной дробной частью. 
Эти функции оказываются весьма полезными, когда необходимо 
согласовать типы параметров при вызове подпрограммы. Пред- 
положим требуется вычислить квадратный корень из целого К. 
Таблица, приведенная в приложении |, указывает, что функция 
ЗОЕТ вычисляет квадратные корни, но ее аргумент должен быть 
вещественного типа. Поэтому запись ЗОКТ (К) была бы ошибоч- 
ной. Одно из решений проблемы — задать вещественную пере- 
менную, скажем АК, и присвоить ей значение К, т. е. АК=К. 
Однако при этом вводится лишняя переменная и программа ста- 
новится менее понятной. Можно принять другое решение — 
применить функцию ЕГОАТ для получения вещественного числа, 
эквивалентного К. Запись З®КТ (ЕГОАТ (К)) позволяет вычис- 
лить квадратный корень из данного целого числа К. Программа 
становится короче и не вводит в заблуждение читателя лишними 
переменными, которые используются только один раз. 

Функции МАХ и МГМ принимают переменное число парамет- 
ров и возвращают соответственно наибольшее или наименьшее 
значение полученных параметров. Нредположим, что нужно вы- 
полнить цикл как минимум один раз, но не более 20 раз, и если 
значение функции находится в диапазоне между 1 и 20, то цикл 
должен выполняться (К-1)/2 раз. Это может быть достигнуто 
с помощью следующих инструкций: 

МТ1МЕ$=МАХО(1, М!МО ((К-1/2,90)) 

РО 55 КОЧМТ=1, МТМЕЗ$ 

Приведенные в приложении [ четыре функции МАХ отлича- 
ются друг от друга типом параметров и конечных результатов. 
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АМАХО и АМАХ! в качестве результата возвращают вещест- 
венные значения, а МАХО иМАХ! — целые значения. Функции 
АМАХОи МАХО принимают только целые параметры, а АМАХ] и 
МАХ| — вещественные. Функции ММ определяются аналогич- 
но. Все параметры функций МАХ и ММ должны быть заданы 
явно: они могут быть простыми переменными, константами, вы- 
ражениями или элементами массива. Имена массивов не допу- 
скаются. По этой причине, даже если ТАВЕЕ — это массив це- 
лых из 20 элементов, то запись МАХО (ТАВГЕ) не может быть 
использована для определения наибольшего элемента этого мас- 
сива. 


0.7.4. Подпрограммы-функции, определенные 
пользователем 


Подпрограммы, определенные пользователем, состоят из 
тех же инструкций, что и главные программы: они включают 
декларации, инструкции присваивания, инструкции КЕАО, 
М/В[ТЕ, ЕОВМАТ, ТЕ, СО ТО, РО, ТОР. Подобно главной про- 
грамме, каждая подпрограмма, определенная пользователем, 
должна оканчиваться инструкцией ЕМО, отмечающей физиче- 
ский конец программного модуля. Дополнительная инструкция 
подпрограммы, КЕТОКМ, осуществляет возврат управления 
в точку вызова. Эта инструкция имеет следующую форму: 


[метка} КЕТОВМ 
где метка — (необязательный) номер инструкции. 


Пример: 
20 КЕТОКМ 


Действие: Возобновляется выполнение программы в той точке, 
из которой была вызвана данная подпрограмма. В момент 
возврата значения всех формальных параметров становятся 
значениями соответствующих фактических параметров. 


Определение функции начинается с инструкции ЕОМСТ1ОМ, 
в которой указываются тип результата, возвращаемого функцией, 
имя функции и имена формальных параметров. Она имеет сле- 
дующий вид: 


[тип] ЕОМСТПОМ имя (спис-парам) 


где тип — явно указанный тип результата функции. По умол- 
чанию, т. е. если тип функции не указан, он определяется 
именем в соответствии со стандартным соглашением о связи 
между типом переменной и первой буквой ее имени; 
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имя — имя функции; оно же используется для возвращения 
результата. Имя функции образуется по тем же правилам, что 
и имя переменной; 

спис-парам — список простых переменных или имен масси- 
вов, содержащий формальные параметры этой функции. 


Пример: 
КЕАГ. ЕОМСТШЮМ В1©(Хх, У) 


Действие: Декларируется функция вещественного типа ВТС; 
указывается, что это начало определения функции; 
указываются два формальных параметра: Х и У. 

Теперь рассмотрим несколько примеров. 

Пример: 


РЕА\ РИМСТТОМ 816 (Х,\) 
РЕАК Х.,Уу 

8В16 = Х 

ТЕ (Х «АТ. \) 816 = \ 
РЕТИКМ 

ЕМО 


Действие: Из двух вещественных значений Х и У функция В @ 
возвращает в качестве результата наибольшее. 


Примечания: 

1. Значение должно быть присвоено имени функции до вы- 
полнения инструкции КЕТОКМ, так как результат под- 
программы-функции возвращается как значение имени 
функции. 

2. Внутри подпрограммы-функции имя функции может быть 
использовано подобно любой неиндексированной пере- 
менной. 

3. Функция не может вызывать сама себя ни прямо (А не 
может вызывать А), ни косвенно (если А вызывает В, то 
ни В, ни какая-либо другая подпрограмма, вызываемая 
В, не могут вызывать А). 

4. Функция не должна изменять значения формальных па- 
раметров. 


Имя подпрограммы-функции используется в данном примере 
двояким образом. Во время выполнения подпрограммы имя — 
это обычная переменная, и она может участвовать в вычислениях. 
В момент выполнения инструкции КЕТОКМ текущее значение 
имени функции становится результатом, возвращаемым подпро- 
раммой-функцией. Возвращение результата через имя функ- 
ции — обычно единственное средство, с помощью которого функ- 
ция связывается с программой, которая ее вызывает. 
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———ы—=— 


Рассмотрим пример обращения к функции ВТО: 


КЕА!(. А,В.С,0 | 
ВКЕАО (-,-) А, В, С 
О = В!С (А, В) 

О = 8!С (0,С) 
МВ1ТЕ (-,-) О 


При первом вызове ВТ@ текущие значения А и В замещают зна- 
чения формальных параметров Х и У соответственно. Вначале 
ВГ@ присваивается значение Х(=А). Однако если У (=В) боль- 
ше, то значение В1@ замещается на У. Инструкция КЕТОКМ пе- 
ресылает текущее значение ВГ@а обратно в правую часть первой 
инструкции присваивания. При втором вызове В1@ предыдущий 
результат О будет передан обратно в подпрограмму-функцию 
ВТО в качестве значения параметра Х, а значение С — в качест- 
ве значения параметра У. Снова выполняются те же действия и 
ВТО возвращает наибольшее из двух значений, О или С. Выра- 
жение ВГС (А, В) можно использовать в качестве одного из па- 
раметров функции ВТА. Инструкция 


р=В1@ (В1С (А, В), © 


дает такой же результат, как и две приведенные выше инструк- 
ции присваивания. 

Прежде чем перейти к подпрограммам типа ЗОВКОЧТ\ЪЕ, 
рассмотрим еще один пример с использованием подпрограммы- 
функции. В этом примере содержится несколько вызовов функции 
АУС, которая вычисляет среднее значение первых М элементов 
вектора из 100 вещественных чисел. 


ВЕАК Х(100), \(100} ВЕАЕ ЕРИМСТТОМ А\УС {Х, М} 
ВЕАн. АМС, ВЕЗ КЕАС Х(100) 
$ ТМТЕСЕВ М 
1 ВЕ$ = А\б(Х,10}' А\Уб = 0. 
® . ТЕ (МЕТ. 1 „ОК, М. СТ, 0 Е 
2 1Е (АУС(У, 4} «ЕЕ. 0) 60 Т(д в рб =и, м 100 ВЕТУАМ 
: А\УС = АУС + ХТ}. 
3 Х(1} = Х(1} - АУССУ, 1009-П 1 СОМТТМИЕ 
$ АУС = АУСИМ 
$ ВЕТИВМ 
ТОР ЕМО 


ЕМО 


Функция АУС в этой программе вызывается для выполнения 
три раза (если инструкции с номерами 1, 2 и 3 выполняются по 
одному разу). При первом обращении к подпрограмме-функции 
вычисляется среднее значение первых 10 элементов вектора Х. 
При втором обращении вектор У и переменная / передаются под- 
программе-функции в качестве параметров, а результат пред- 
ставляет собой среднее значение / элементов, от У (1) по У(УТ. 
При третьем обращении в качестве передаваемого параметра вы- 
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ступает выражение: если [ имеет значение 32, то результат вы- 
числения функции — это среднее значение элементов от У (1) по 
У (68). 

‚ Когда в результате какого-то вычисления необходимо вер- 
нуть одно результирующее значение, удобно воспользоваться 
подпрограммой-функцией. Однако для организации более слож- 
ных связей необходимы подпрограммы другого типа, такие, как 
эОВЮОПТТМЕ. Перейдем к их рассмотрению. 


0.7.5. Подпрограммы типа ЗУВКОЧТИМЕ 


Подпрограммы такого типа вызываются с помощью специ- 
альной инструкции САТ.1.. Эта инструкция имеет следующую фор- 
му: 

[метка] САГ. имя (спис-парам)]| 
где метка — (необязательный) номер инструкции; 

имя — имя подпрограммы; 

спис-парам — список простых переменных, констант, выра- 

жений, элементов и имен массивов. 


Пример: 
КЕАГ АГАКВСЕ, Р 
РАТА Р/5.0/ 
САЦ. МАХ {Р, 4.7, АГАВОЕ) 


Действие: Вызывается подпрограмма МАХ и ей передаются фак- 
тические параметры Р, 4.7, АГАКОЕ. 


Подпрограммы, написанные пользователем, начинаются с ИН- 
струкции ЗОВКОЧТИМЕ: 


ЗОВКОЧТИ\Е имя [(спис-парам)] 


где имя — имя, которое идентифицирует подпрограмму; 
оно строится по тем же правилам, что и имя переменной; 
спис-парам — список из одной или нескольких простых пе- 
ременных или имен массивов, разделенных запятыми. 


Пример: 
ЗОВКОЦТИМЕ ОКРЕК (Х, У) 


Действие: Задается начало подпрограммы с именем ОЮОРЕК и 
двумя формальными параметрами Х и У. 


Тело подпрограммы типа ЗОВКОЧТИМЕ строится подобно 
телу функции; в подпрограмме используются те же декларации, 
присваивания, переходы и инструкции ввода/вывода. Инструк- 
ция КЕТОКМ, как и в функции, передает управление обратно 
в точку, из которой была вызвана подпрограмма. Однако в отли- 
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чие от имени функции имя подпрограммы типа ЗОВКОЧТИМЕ 
нельзя использовать в качестве переменной. Оно служит только 
для идентификации подпрограммы. Другое отличие состоит 
в том, что в подпрограмме разрешено изменять значения формаль- 
ных параметров; и именно таким путем подпрограммы возвраща- 
ют результаты вызывающему программному модулю. Приведем 
примеры подпрограмм. 


Пример: 


$ИВРОИТТМЕ ОВОЕВ (Х.\) 
АЕА! Х, \, ТАРСЕЯ 
ТЕ (Х „СТ. \) ВЕТОВМ' 


САВСОЕВ = У 
У =Х 

Х = ТАВСЕВ 
ВЕТИВМ 

ЕМО 


Действие: Из двух заданных вещественных значений Х и У под- 
программа ОКРЕК наибольшее значение присваивает Х, 
а наименьшее У. 


Примечания: | 

1. Значения переменных в списке параметров могут быть из- 
менены в ходе выполнения подпрограммы. 

2. Инструкция КЕТОКМ может быть расположена в любом 
месте исполняемой части подпрограммы. 

3. Имя подпрограммы не является переменной; оно только 
идентифицирует подпрограмму. Имя не имеет типа. 

4. Никакая другая подпрограмма или переменная в данной 
подпрограмме, а также в вызывающем программном моду- 
ле не могут иметь имени, идентичного с именем данной под- 
программы. 

5. Подпрограмма не может вызывать сама себя ни прямо 
(А не может вызывать А), ни косвенно (если А вызывает В, 

_ то ни В, ни другая подпрограмма, которую вызывает В, не 
могут вызывать А). 


Механизмы возврата результатов в подпрограммах и функци- 
ях различаются. В то время как функция возвращает единствен- 
ный результат как значение имени функции, подпрограмма пе- 
редает результаты как значения своих параметров. В момент 
выполнения инструкции КЕТОКМ конечные значения всех фор- 
мальных параметров присваиваются соответствующим фактиче- 
ским параметрам. Следует, однако, иметь в виду, что, если из- 
меняется значение формального параметра, представляющего со- 
бой константу, могут возникнуть неожиданные результаты или 
даже ошибки. В разд. 2.2 мы рассмотрим различные механизмы 
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передачи параметров; пока же ограничимся простым советом: 
можно изменять значение только такого формального параметра, 
которому в списке фактических параметров соответствует про- 
стая переменная, элемент или имя массива. 

Так как подпрограмма возвращает результаты вычислений 
через список параметров, она может передавать несколько зна- 
чений. Каждой простой переменной в списке параметров подпро- 
грамма может присваивать значение, которое в момент возврата 
передается обратно в вызывающую программу. Если в списке 
формальных параметров указан массив, то в результате выпол- 
нения подпрограммы можно передать значение каждого элемен- 
та массива. Таким образом, число результатов, возвращаемых 
подпрограммой ЗОВКОЧТИМЕ, ограничено только числом фор- 
‘мальных параметров и размерностью массивов, выступающих 
в роли формальных параметров. 

С другой стороны, в подпрограмме вообще может отсутствовать 
список параметров. Рассмотрим подпрограмму, которая пред- 
назначена для повторной печати заголовка отчета. Вызов под- 
программы происходит каждый раз в ходе печати, когда начи- 
нается новая страница. При этом подпрограмме не требуется пе- 
редавать никакой информации, и нет никаких результатов, ко- 
торые следовало бы передавать из подпрограммы обратно в вы- 
зывающую программу. В такой подпрограмме не нужны никакие 
параметры. Инструкции ЗОВВООТИГ\МЕ и САШ, для такой под- 
программы не содержат списка параметров и круглых скобок. 

Приведем пример еще одной подпрограммы. Подпрограмма 
[МРОТ считывает М значений, располагает их в массиве и прис- 
ваивает переменной ЕККОК значение ТКОЕ, если данных не 
хватает. 


АЕАС Х(30), \У{30), 2640) ЗУВАОИТТМЕ 1МРУТ 4Х, М, ЕВАОК) 
ГОСТСАК ЕОЕ ВЕАЕ ХЕМ) 
1МТЕСЕВ М ТОСТСАК ЕВВОВ 
М = 30 ЕВКОВ = „РАК$Е» 
САБ) 1МРИТ (Х, 10, ЕДЕ) ТЕ (№1Е.0) РЕТИВМ . 
12 (ЕО) 69 ТО 99 ВЕАО (5,4,ЕМО=1) (ХТ) ,1=1.М) 
; | РКЕТИВМ | 
СА: ТМРИТ (\, М, ЕДЕ). ] ЕААОВ = «ТВАЦЕ. 
. АЕТИКМ 
САЁЕ [МРОТ (7, М№М+10, ЕДЕ) % РОАМАТ (1615) 
: ЕМО 


99 НАТЕ (6,199) 
199 ЕОВМАТ (' О0Т ОЕ ОАТА') 
510Р - 


(Сообщение в инструкции 199: ‘’не хватает данных’) 


Выполнение подпрограммы при первом ее вызове происходит 
следующим образом: 

1. В момент вызова значения элементов вектора Х, константа 
10 и переменная ЕОЕ передаются в подпрограмму ПМРОТ. В под- 
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программе им соответствуют формальные параметры Х, М и 
ЕККОК. 

2. В подпрограмме ПМРОТ выполнение операций продолжа- 
ется до тех пор, пока не будет считано М значений или не будут 
введены все перфокарты. 

3. При выполнении инструкции КЕТОКМ текущие значения 
элементов вектора Х, переменных № и ЕККОК присваиваются 
фактическим параметрам, в данном случае Х, 10 и ЕОЕ. 

4. В вызывающей программе выполнение возобновляется 
с инструкции, непосредственно следующей за инструкцией САГГ. 

Заметим, что в данном примере размерность массива переда- 
ется в качестве параметра и что формальный параметр Х описан 
в декларации КЕАГ как массив. Массивам, передаваемым в ка- 
честве параметров, не отводится область памяти в подпрограм- 
ме. Декларация КЕАГ необходима лишь для того, чтобы ука- 
зать, что Х — массив, а размеры массива используются в фор- 
муле доступа для ссылок на элементы массива. Массив может 
иметь переменный индекс в декларации только в том случае, 
если и имя массива, и числа, ограничивающее диапазоны измене- 
ния его индексов, являются формальными параметрами. Кроме 
того, эти числа (размеры) должны быть целыми. В таких случаях . 
говорят об использовании регулируемых размеров. 

Как показано в приведенном примере при первом вызове под- 
программы, регулируемый размер массива может быть меньше, 
чем фактический размер массива, однако он не может быть боль- 
ше фактического размера. Для многомерных массивов передава- 
емые размеры должны быть точно согласованы с истинными раз- 
мерами массивов, так как передаваемые размеры используются. 
для расчетов по формуле доступа. 

На этом мы заканчиваем описание основных инструкций Форт- 
рана. Глава завершается примером, в котором использованы мно- 
гие из рассмотренных нами положений. Когда вы приступите 
к разбору примера, вероятно, вам будет нужно вернуться к оп- 
ределению тех или иных инструкций для того, чтобы уточнить, 
как они работают или почему они так записаны. 
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В этом разделе мы рассмотрим пример, в котором покажем 
применение инструкций, описанных в данной главе. Пусть фирма 
МЕО — организация, специализирующаяся на поставках то- 
варов, заказанных по почте. У фирмы есть список фамилий и ад- 
ресов потенциальных заказчиков; этот список отсортирован по 
шифрам клиентов. Фирма очень заинтересована в получении но- 
вых имен и адресов, которые могут быть добавлены к основному 
списку. В связи с этим фирма покупает списки имен и адресов 
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у специальных агентов. Получая списки от агентов, фирма оп- 
Лачивала их услуги. Позже однако выяснилось, что многие «но- 
вые» клиенты в действительности дублируют тех, что уже были 
в списке. Поэтому необходимо иметь такую программу, которая 
обнаруживает одинаковые имена, обновляет основной список 
и начисляет агенту $ 25 за каждого действительно нового клиента. 

Для упрощения программы мы будем полагать, что ввод орга- 
низован с перфокарт, основной файл состоит не более чем из 1000 
пятиразрядных шифров клиентов, каждый список добавлений 
упорядочен, содержит не более 100 записей (шифров) и заканчи- 
‘вается перфокартой, на которой пробито 99999 #. Общая блок- 
схема решения данной задачи приведена на рис. 0.9. После чте- 
ния основного файла и вплоть до обнаружения «конца файла» 
(ЕОЁ) для колоды перфокарт с новыми данными выполняется 
следующий цикл: 

1. Прочитать очередной файл добавлений. 


ВЫВОД 
ОСНОВН. 
ФАЙЛА 


Рис.0.9. Общая блок-схема решения задачи. 


2. Выполнить слияние с основным файлом, устранив дубли- 
рование. 
3. Вывести на печать счет к оплате за новый список. 


Ниже приведен пример, показывающий, как должна работать 
та часть программы, которая обеспечивает слияние. В результате 
слияния основного списка (МАЗТЕЮ) со списком добавлений 
(ОРБАТЕ) получается новый файл (МЕКСЕР ЕШЕ). | 


1) Из программы (рис. 0.11} непосредственно следует, что список добавле- 
ний начинается с номера, который, по-видимому, является шифром агента, — 


Прим. ред, 
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МАЗТЕВ ИРБАТЕ МЕВСЕО РЕЕ 


1 2 1 
к. 3 2 <== НОВЫЙ КЛИЕНТ 
8 5 3 

20 8 


я «== НОВЫЙ КЛИЕНТ 
10 


Можно, конечно, выполнить слияние таким образом, чтобы 
результирующий файл после слияния был бы тем же самым мас- 
сивом, который первоначально содержал основной список. Но 
для этого потребовалось бы дважды просматривать основной 
файл. Поэтому мы будем хранить оба основных списка в масси- 
ве, состоящем из двух столбцов, один из которых представляет 
текущий основной список, а другой — результат слияния. 


{Ввод столбца 
СМ 8 
МАЗТЕВ 


САС 
1МРОТ(УРБАТЕ) 


ЛЕЧАТЬ САС. ПЕЧАТЬ _ 
СЧЕТА МЕАСЕВ(МАЗТЕВ, < СТОЛБЦА СМ 
| СМ, УРОАТЕ) } ИЗ МАЗТЕ® 


Рис.0.10. Блок-схема главной программы. 


Мы должны иметь возможность выполнять попеременные слия- 
ния, если на входе будет более одного файла добавлений: перво- 
начально будет произведено слияние с первым столбцом, затем 
со вторым, затем снова с первым ин т. д. Вместо того чтобы писать 
две одинаковые программы для выполнения того же самого слия- 
ния, мы создадим подпрограмму МЕКСЕК, которая будет ра- 
ботать в обоих случаях. Аналогично воспользуемся подпрограм- 
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— — — — — — — м р м о — = о — — — = => — — — = — — 


— ыы 
— — = — — == = = — — — — = — — — ыы — 


= ПРОГРАММА ОБНОВЛЯЕТ ОСНОВНОЙ ФАЙЛ ИДЕНТИФИКАЦИОННЫ Х= 
С= НОМЕРОВ КЛИЕНТОВ С ПРОИЗВОЛЬНЫМ ЧИСЛОМ ВХОДНЫХ= 
С= ФАИЛОВ. ВЫПОЛНЯЕТСЯ СЛИЯНИЕ, ДУБЛИРУЮЩИЕСЯ НОМЕРА= 
= ОПУСКАЮТСЯ. ПРИ КАЖДОМ ДОБАВЛЕНИИ НОВОГО НОМЕРА= 
С= К ОСНОВНОМУ ФАИЛУ НАЧИСЛЯЕТСЯ.0.25 НА СЧЕТ АГЕНТА. ПОСЛЕ= 


= ОСНОВНЫЕ ПЕРЕМЕННЫЕ: , 

С= ОРРАТЕ — ФАЙЛ ДОБАВЛЕНИИ НА ПЕРФОКАРТАХ,; . 
= МАЗТЕЮ — ОСНОВНОЙ ФАЙЛ, ДВА СТОЛБЦА ОСНОВНОГО ФАЙЛА 
= ИСПОЛЬЗУЮТСЯ ПОПЕРЕМЕННО; 
= ОМСОГ — ОПРЕДЕЛЯЕТ, КАКОЙ СТОЛБЕЦ ФАЙЛА МАЗТЕК 
= СОДЕРЖИТ СТАРЫЕ ДАННЫЕ; 


ниннниииининиининиинюн 


С= 0Р517 — ЧИСЛО ИДЕНТИФИКАЦИОННЫХ НОМЕРОВ В ПОСЛЕД- 
с= НЕМ ФАЙЛЕ ДОБАВЛЕНИЙ; 
= ОРМОМ — НОМЕР ФАЙЛА ОРРАТЕ; 
С= ОМ$12 — ЧИСЛО ИД.НОМЕРОВ В ПОСЛЕДНЕМ МАЗТЕВ; 
с= СОТ — СТОИМОСТЬ ПОСЛЕДНЕГО ОБНОВЛЕНИЯ. 
С= ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: 
= МРОТ  — ПОДПРОГРАММА ВВОДА ВСЕХ ФАЙЛОВ ОРРАТЕ; 
= — МЕВСЕВ — ПОДПРОГРАММА СЛИЯНИЯ ПОСЛЕДНЕГО ЧРРАТЕ 
с= С ФАЙЛОМ МАЗТЕКЮ. 
С=ПРОГРАММИСТ; — — — ДАТА; — — — 
яичники нина нити 


| ® 
ТНТЕСЕВ ИРОАТЕ( 100}, МАЗТЕВК( 1000,2] ИРЗ17»; УРМИМ» 9М$12» ОМСОЕ 
УМТЕСЕВ ВОВ, РВАТ о. 
ЗЕАС СОТ 
ОАТА ОМСОЕИЛ/, ВОВ/5/» РАТ/БР 
[мине воине ВВЕСТИ И РАСПЕЧАТАТЬ ФАИЛ МАЗТЕК . 
ВЕАО (В08,100,ЕМр=99) ОМ$1И, (МАЗТЕВ (ТГ, ОМСОЕ!, 1=1,0М$173 
100 ЕОАМАТ {15 / (1615) } - 
НАТТЕ (РАТ,110} {МАЗТЕА (Т.ОМСО)у 1=1,04$171 
110 ЕОРМАТ (11', 20Ху *СОВВЕМТ МАЗТЕВ Е14Ез8 // 8(5Х, 15} 
р-он, ВЫПОЛНИТЬ ЕЩЕ ОДНО СЛИЯНИЕ? 
10 САД. 1МРИТ (ШРОАТЕ, ИР$1Х. ИРМОМ} 
с-ченичиниые < РАСПЕЧ, ПРОАТЕ. СЛИТЬ И ВЫВЕСТИ ЗАДОЛЖЕННОСТЬ 
УАТТЕ (РВТ,120} ИРМИЫМ, ЗИРРАТЕ(Т)» Т=1,ЦР$177 
28 — ЕОВМАТ (10%, 20Ху 'ИРОАТЕ ЕТЬЕ МУМВЕА*» 16» ':7 /Г 8(5Х, 15] 9 
СА. МЕАСЕВ (УРОАТЕ» 517, МАЗТЕК, 0М517+ ОМСОС) 
СО$Т = ›»25*%0РЗ ТЕ 
НАТТЕ {РВТ,130) ИРМИМ, С0$Т, УРЗТЕ 
130 ЕОВМАТ {10', 2Х, *ЕТЕ МОМВЕА"» 16» * ТО ВЕ РАО $1, Р6.2о 
х : Е0ОВ'., 15, #1 МЕМ АОБВЕ$ $ Е$ 
60 ТЗ 10 
$-------5-5 РАБОТА ОКОНЧЕНА? ВЫВОД МАЗТЕК И ОСТАНОВ 
29 МАТТЕ {РЕТ,110) (МАЗТЕЯ То ОМСОЬЛу 1=1,0М$517} 
ИВТТЕ (РАТ,»140} 
140 РОВМАТ {$10', #*** 308 СОМРЕЕТЕО жжж1] 
ТОР 


$---------ч->, ОШИБКА ВО входном ФАЙПЕ: ПРЕКРАТИТЬ РАБОТУ 
99 ЧЕ1ТЕ (РАТ, 1501 


Рис. 0.11. Программа слияния файлов и подготовки счета для оплаты. 
(Текст в инструкции 110: «Старый файл МАЗТЕВ», 120; «Номер файла ЧР- 
РАТЕ», 130: «Номер файла», «Выплатить», «Новые адреса», 140: «Работа за- 
кончена», 150: «Ошибка при вводе МАЗТЕК, останов», 110: «Слишком много 
добавлений»; 100: «Превышен размер МАЗТЕК, останов в МЕКОЕК..) 
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150 РОРМАТ (' ж** МАЗТЕВ Е1ЁЕ 1МРУТ ЕВАОВ: НАСТУМС 1№ МАТМ +**') 
ТОР 
ЕМО 


ЗОВВОИТТМЕ ТМРОТ (ЕТЁЕ, №, ЕМУМ) 
ат =ЕЕЕНЕЕЕЕТЕЕЕЕ ЕЕТРЕЕЯЕЕСЕЯЕЕЕ НЕЕ Е Е ЕН ЕЕ ЕЕ Е ЕЕЕЕЕЕЕЕЕНЕ=ЕНЕЕ Я = 
С= ЕСЛИ ПЕРЕД ЭТИМ НЕ ВСТРЕТИЛСЯ КОНЕК, ФАЙЛА, ВВЕСТИ СЛЕДУЮЩИЙ ФАЙЛ 
С= ДОБАВЛЕНИЙ 
С= ОСНОВНЫЕ ПЕРЕМЕННЫЕ 
С= ЕП.Е — - ПАРАМЕТР, ОБЛАСТИ ДЛЯ НОВОГО ФАЙЛА ИРОАТЕ 


С= М — ПАРАМЕТР, РАЗМЕР НОВОГО ФАЙЛА ИРОАТЕ 

С= ЕМИМ — ПАРАМЕТР, НОМЕР НОВОГО ФАЙЛА 

С= ЕОР — ТВОЕ. ЕСЛИ ВСТРЕТИЛСЯ КОНЕЦ, ФАЙЛА 

С= МАВКЕК — ПРИЗНАК КОНЦА ДОБАВЛЕНИЙ: ЗДЕСЬ 99999 

Саз=2т======= нЕ ЕЕ ЯН Е ЕР ЕЕЕЕЕ ЕЕ Е ЕЕ ЕЕ Е ТЕ ЕЕ ЕН ОАЕНЕЕЕЕЕЫЕЯ 


ТМТЕСЕВ Е14Е(100), М, ЕМИМ — 

ТМТЕСЕК МЕМУАЁ, МАВКЕВ, ВОК, РАТ 

ТОСТСАЕ ЕОбЕ 

РАТА МААКЕВ /99999/, ЕОРИ.РАЕЗЕ. И, КОК/5/. РАТ/б/ 
Сож ыьнсеь--ЕСЛИ УЖЕ БЫЛ КОНЕЦ ФАЙЛА, ТО ПРЕКРАТИТЬ РАБОТУ 


1=1 

ТЕ (.МОТ. ЕДЕ} С0 ТО 10 
Н=о0 
АЕТИАМ 


-емть === --ВВЕСТИ НОМЕР ФАЙЛА И ВСЕ ДОБАВЛЕНИЯ, ВПЛОТЬ ДО МАВКЕВ 
10 ВЕАС (808,100, ЕМ0=30) ЕМУМ 
100 РОВМАТ, (151 
О 20 Т=\1, 100 
ВЕАС (408 ,100,ЕНО=30) Е11Е(Т} 
1Е (РЦЦЕ(Т) „ЕС, МААКЕВ) СО ТО 40 
20 СОМТТМУЕ 
Сет с-тл "ДОЛЖЕН БЫТЬ ИЛИ МАРКЕР ИЛИ КОНЕЦ ФАЙЛА 


КЕАО (КОВ,100,ЕМО=30) МЕНУАС 
ТЕ (МЕМУАЬ „ЕО. МААКЕВ) 60 ТО 40 
--еча-енч- += СЛИШКОМ „Много (БОЛЕЕ 100) ДОБАВЛЕНИЙ | 
МАТТЕ (РАТ, 110) 
110 РОАМАТ (' *** то АНУ ОРОАТЕ$ 1№ Е1ТШЕ', 16, * *%%) 
$ТОР 
С--=--=---+--- КОНЕЦ, ФАЙЛА; ЗАПОМНИТЬ ДЛ 
50 ЕОЕ = ТВУЕ НЕВ ПОМНИТЬ ДЛЯ СЛЕДУЮЩЕГО ВЫЗОВА 
40 М = Т-1 
ЕТОВМ 
ЕМО 


5$ЧВКОЧТИМЕ МЕВРСЕК (ОРОАТЕ. Ч9Р$17, МАЗТЕКВ, ОМ$12, ОМСОГ,) 


С= СЛИЯНИЕ СПИСКА ДОБАВЛЕНИЙ СО СТОЛБЦОМ ОМСОГ МАССИВА 
= МАЗТЕВ; ЗАНЕСЕНИЕ РЕЗУЛЬТАТА В ДРУГОЙ СТОЛБЕЦ МАЗТЕЮ 


= ОСНОВНЫЕ ПЕРЕМЕННЫЕ: = 
= ОРРАТЕ — СПИСОК, ПОДЛЕЖАЩИЙ СЛИЯНИЮ С МА$ТЕКВ; = 
С= О Р$Г2 — РАЗМЕР ФАЙЛА ОРРАТЕ; = 
С= МАЗТЕВ — СТОЛБЕЦ ОМСОГ, —ЭТО МА$ТЕВ; В ДРУГОЙ СТОЛБЕЦ= 


С= ПОМЕЩАЕТСЯ НОВЫЙ МАЗТЕК; 
С= ОМ$12 — ЧИСЛО ЭЛЕМЕНТОВ В СТАРОМ МАЗТЕВ; 
С= ОМСОГ — СТОЛБЕЦ 'МАЗТЕВ’, СОДЕРЖАЩИИ СТАРЫЙ МАЗТЕВ; 


= ММСОГ Ш— СТОЛБЕЦ 'МАЗ$ТЕВ’ ДЛЯ НОВОГО МАЗ$ТЕВ; 
= ОРРТВ — СЧЕТЧИК ДЛЯ СПИСКА ОРРАТЕ; 
= ОМРТК — СЧЕТЧИК ДЛЯ СТАРОГО МАЗТЕВ; 


С= ММРТК — СЧЕТЧИК ДЛЯ НОВОГО МАЗТЕК; 
С= м$12 — РАЗМЕР ФАЙЛА МАЗТЕЮ (ЗДЕСЬ — 1000}; 
СЕЕЕЕЕЕЕЕ]Е]ЕЕЕЕЕЕ"Е ЕЕ] Е >ЕРРРЕЕЕЫЕЕЕЕЕЕЕЕСЫЕЕ=ЕСЗ 


Продолжение Рис. 0.11, 
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ТМТЕСЕВ ОРОАТЕ(100), ЦР$12, МАЗТЕК { 1000,2), ОМ$12, ОМСОЁ, ММСОЕ 
ТНТЕСЕВ ОРРТВА, ОМРТЕ, ММРТА, РАТ 
ОАТА РАТ/б/ 


с------------- ММСОГ. ДОЛЖЕН УКАЗЫВАТЬ НА СТОЛБЕЦ НОВОГО МАЗТЕК 
ММСОЕ = 1 
17 (ОМСОС „ЕС. 1) ММСОЕ=2 
с----—--------- НАЧИНАТЬ С ВЕРШИНЫ КАЖДОГО СПИСКА 
ОРРТВ = 1 
ОМРТВ = 1 
НЫРТВ = 1 
с------------- ОПРЕДЕЛИТЬ, из КАКОГО СПИСКА ВЗЯТЬ СЛЕДУЮЩИЙ ЭЛЕМЕНТ 


10 1: (ШРРТВ.СТ. 0Р$ 17’.АМО. ОМРТВ .СТ. 0м$12} 60 ТО 50 
,. 1Е (ОРРТВА „СТ. Р5$12) СО ТО 40 
1Е (ОМРТА «СТ. 0М$12} 60 ТО 20 
12 (ОРОАТЕ(УРРТЯ) - МАЗТЕК( ОМРТВ,ОМСОЕ}} 20, 30, 40 
С--+----------- ВЗЯТЬ ЭЛЕМЕНТ ИЗ ПРОАТЕ , ПРОВЕРИТЬ НА ПЕРЕПОЛНЕНИЕ 

20 1Е (ММРТА „СТ, 1000} С0 ТО 99 

МАЗТЕК ( ММРТК , ММСОЕ) = УРОАТЕ(ОРРТВ) 

ММРТВ = ММРТВ+1 

ОРРТВ = УРРТВ+1 


60 ТО 10 
с---—-------- ПРОПУСТИТЬ ЭЛЕМЕНТ В УРВАТЕ 
30 УРРТК = УРРТВ+1 
СО ТО 10 
с------------- ВЗЯТЬ ЭЛЕМЕНТ ИЗ СТАРОГО МАЗТЕВ, ПРОВЕРИВ НА ПЕРЕПОЛНЕНИЕ. 


40 1Е (ОМРТЕ „СТ. 0М$17) С0 ТО 50 
ТЕ (ММРТВ „СТ, 1000) 60 ТО 99 
МАЗ ТЕК ( ММРТВ ‚МСО } = МАЗТЕВ ( ОМРТА, ОМСОЕ 
ММРТК = ММРТЕВ+1 
ОМРТВ = ОМРТКЕ+1 
СО ТО 10 
С------------- СЛИЯНИЕ ОКОНЧЕНО: ПРИСВ. ЗНАЧЕНИЯ ОМСОЁ., ОРЗТХ И 0М$12 
50 9Р5112 = ММРТВ-ОМ$12- 1 
ОМ5 17 = ММЫРТВ-1 
ОМСОЕ = ММСОЬ 
КЕТУАМ 


с------------- ПРОИЗОШЛО ПЕРЕПОЛНЕНИЕ: ПРЕКРАТИТЬ РАБОТУ 
99 ИВТТЕ (РКТ, 100 


100 РОВМАТ ({' *ж*  АЗТЕК Е14Е $12Е ЕХСЕЕОЕО: НАСТТМС {М МЕКСЕВ *#*'} 
ТОР 
ЕМО 


Продолжение Рис. 0.1 |. 


мой ПУРОТ для чтения входных файлов. Рис. 0.10 иллюстрирует 
логику работы главной программы. 

Теперь мы можем закончить проектирование двух подпро- 
грамм и полностью запрограммировать решение поставленной 
задачи. Список параметров подпрограммы ввода ПМРОТ должен 
содержать целый вектор для представления файла добавлений 
ОРПАТЕ, который нужно читать и передавать обратно в главную 
программу. Главная программа должна «знать» число шифров 
клиентов, которые были считаны подпрограммой [МРОТ; это 
число передается в главную программу как значение переменной 
0Р$17. Наконец, если необходимо вместе со счетом печатать но- 
мер введенного списка шифров, то подпрограмма ПУРОТ должна 
передать в главную программу и эту величину; мы ее назовем 
ОРМОМ. Таким образом, в главной программе вызов подпро- 
граммы [МРУТ будет иметь вид, представленный на рис. 0.1]. 
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Далее анализ подпрограммы МЕКСЕК показывает, что под- 
программа должна «знать» размеры основного файла и списка 
добавлений; назовем их соответственно ОМ$17 и ОРЗ. Под- 
программа слияния должна «знать» также, какой столбец 
МАЗТЕК содержит текущий основной список; он будет назван 
ОМСОГ.. Мы видим, что после слияния главная программа долж- 
на «знать», сколько добавилось новых клиентов, а также размер 
нового основного файла. Вместо того чтобы увеличить число па- 
раметров в списке возвращаемых величин, будем присваивать эти 
значения соответственно переменным ОРЗ и ОМЗ, поскольку 
предыдущие значения этих переменных больше не нужны. 

На рис. 0.11 показано, как главная программа взаимодейст- 
вует с подпрограммами. 


Упражнения 


0.01. Заданы два целых числа. Определить наибольшее целое число, на кото- 
рое делятся оба числа без остатка (эта величина называется наибольшим об- 
щим делителем). 


0.02. Совершенное число — целое, равное сумме его делителей. Например, 
6 совершенное число, поскольку сумма его делителей 1, 2 и 3 равна 6. Напи- 
шите программу, которая читает произвольное количество целых чисел и вы- 
водит на печать те из них, которые являются совершенными. 


0.03. Напишите программу учета товаров в магазине. Каждый учтенный пред- 
мет имеет 9-разрядный идентификационный код, розничную и закупочную 
стоимость товара. Программа должна следить за распродажей имеющихся 
товаров и закупкой новых следующим образом: положительные величины во 
вводном файле обозначают поступающие товары, и магазин должен их опла- 
чивать;, отрицательные величины обозначают проданные товары, оплаченные 
покупателями. Когда вводный файл исчерпан, делается полный учет имею- 
щихся в наличии товаров и полученной прибыли. 


0.04. Напишите программу, распечатывающую ежемесячный банковский от- 
чет. В нем должны быть указаны все новые вклады и даты их поступления, а 
также ежедневный текущий баланс. 


0.05. Вернитесь к подпрограмме МАХ из разд. 0.7.5. Напишите аналогичную 
подпрограмму для работы с векторами, имя подпрограммы МАХУ, ее пара- 
метры (Х, М, У, М, АМАХ). Эта подпрограмма присваивает АМАХ макси- 
‚ мальное значение среди значений Х и У в интервалах от Х (1) до Х (№) иУ (1) 
до У (М), где М, М=50. 


0.06. Задан массив из М элементов, содержащий суммы вкладов. Напишите 
фрагмент программы, который печатает М--1 строк следующего вида: 


ТЕКУЩИЕ СУММЫ ВКЛАДОВ 


ВКЛАД-1| СУММА 153.20 Р 

ВКЛАД-2 СУММА 210.13 Р 

и Т.Д. и т. д. и Т. д. 
0.07. Напишите подпрограмму ЕГШР, которая печатает элементы массива 
в обратном порядке. Например, применительно к приведенному ниже век- 
тору Х подпрограмма ЕТ]Р возвращает следующий результат: 


Начальные значения Х: 3, 4, 12, 9, 8 
Результат работы ЕР (Х): 8, 9, 12, 4, 3 
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Выполните эту работу только с одним вектором. 


0.08. Допустим, что вам нужно определить лучшего автогонщика по резуль- 
татам многих соревнований. Для каждого гонщика и каждого заезда вами 
подготовлена одна перфокарта, на которой записан номер гонщика, средняя 
скорость, показанная им в заезде, и место, которое он занял. В конце года 
вы сортируете перфокарты по номерам водителей. Напишите программу для 
определения первых пяти гонщиков в соответствии со средней скоростью по 
всем гонкам, в которых они финишировали. Водители, которые не выиграли 
ни одной гонки или принимали участие менее чем в пяти гонках, не должны 
рассматриваться программой. 


0.09. Фирма ЗГОР (от 5$ГО\’ Рговтатит!пя: программируйте медленно, но 
верно) заключила контракт на выполнение задания для фирмы АККАУ$ 
МС. Фирма АККАУЗ ПМС. производит продукцию самых различных типов. 
Задача программистов фирмы ГОР — написать программу, которая следит 
за продукцией фирмы АККАУЗ ПМС. Каждый раз, когда произведена партия 
(или единица) продукции, оператор набивает на перфокарте значения пере- 
менных ТУРЕ, ОЧАМТ, НОЦВ$ и СОЗТ, представляющих тип продукции, 
ее количество, время, затраченное на ее изготовление, и стоимость продукции. 

Для каждого типа продукции может быть заведено несколько перфокарт, 
поскольку для ее производства может потребоваться работа людей на различ- 
ных участках или в разное время дня. В конце каждой недели все перфокарты 
собираются. На число исходных перфокарт никаких ограничений нет, и они 
никак не отсортированы. 

Нарисуйте блок-схему и напишите программу, выполняющую следую- 
щее задание. Для каждого типа продукции, изготовленной за день, вычислите 
общее затраченное время, стоимость продукции и общее количество единиц 
произведенной продукции. Хотя в течение дня может быть произведено не 
более 100 различных типов продукции, фирма АВКАУ$З$ ПМС. может произво- 
дить тысячи различных деталей и каждая из них идентифицируется 9-разряд- 
ным числом. На печать следует выводить только информацию, относящуюся 
к данному дню. Еженедельная сводка должна состоять из пяти частей, по од- 
ной на каждый рабочий день недели. Перед набором рабочих перфокарт, 
полученных за день, установите перфокарту с датой по Юлианскому календарю 
(например, 77032 эквивалентно 2/1/77); для отличия сделайте эту величину 
отрицательной. На входе, таким образом, получится следующий поток данных: 
первая перфокарта с датой, затем колода рабочих перфокарт первого дня ра- 
боты, вторая перфокарта с датой, за которой располагается колода рабочих 
перфокарт второго рабочего дня, и т. д. по пятый рабочий день включительно. 

Пример заглавия и содержимого сводки: 


„ АВКАУС 1МС. СВОДКА ДАТА 82023 
«+ ДЕТАЛЬ ШТУК ВРЕМЯ (ЧАС) ОБЩ. СТОИМОСТЬ 
328 150 2.3 800.58 
ИТ. Д. итд. итд. ИТ. Д. 
„«х АВВАУЗ ПМС. СВОДКА ДАТА 82024 
ИТ. Д. 


0.10. Напишите программу игры в крестики-нолики на поле 3ЖЗ. Судья 
должен по очереди предоставлять ход двум игрокам. Ход заключается в том, 
чтобы поставить Х или 0 в свободный квадрат. Судья объявляет победителем 
того, кто первым записал три крестика или нуля в ряд. Проверьте работу 
программы-судьи. При этом вы можете сами играть роль участников, указы- 
вая ваши ходы на терминале (в интерактивном режиме), или составить под- 
программы Х и 0, которые будут делать ходы, т. е. решать, где расположить 
следующий маркер (представьте Х и 0 целыми числами |[ и 0 соответственно). 


0.11. Симметрическая матрица — это двумерный массив, в котором А (1, Г)= 
—А (Л, 1) для всех значений Ги. Например, матрица 
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симметрическая и единственным образом представима с помощью треугольной 
матрицы: 


1 
42 
563 


Напишите подпрограмму $УМ для проверки матриц произвольного размера 
менее 25. Подпрограмма должна выводить на печать нижнюю треугольную 
матрицу, если матрица оказалась симметричной, и возвращать логическое 
значение .ТКОЕ. ИЛИ .ЕАТЗЕ. в зависимости от того, симметрична или не- 
симметрична очередная матрица. | 


Глава 1 


СТИЛЬ ПРОГРАММИРОВАНИЯ 


Программирование сродни писательской деятельности. Лю- 
бая программа, время жизни которой выходит за пределы од- 
норазового выполнения, должна быть тщательно спланирована 
и построена, подобно тому как это делается при составлении пле- 
нарных докладов, статей, рекламных объявлений и т. д., т. е. 
всех средств письменного общения. Эту главу мы посвящаем 
стилю программирования. 

Здесь и в последующих главах мы будем придавать большое 
значение рациональным методам, которыми пользуются квалифи- 
цированные программисты. Конечно, вместо того, чтобы просто 
запомнить все изложенные методы и пытаться применять их ме- 
ханически, вам следует подробно ознакомиться с этими методами, 
постараться понять, почему и как они применяются, и вырабо- 
тать ваш собственный стиль программирования, удовлетворяю- 
щий рассмотренным в книге критериям. Используемые нами ме- 
тоды не представляют собой каких-то жестких правил. 


1.1. Пример 


Мы начинаем данную главу с рассмотрения примера, в кото- 
ром продемонстрировано много плохих приемов программирова- 
ния. Мы придумали этот пример не только потому, что здесь 
мало места для всех реальных программ, в которых мы видели 
точно такие же дефекты. Одни программы были написаны сту- 
дентами, другие представляют собой рабочие, часто выполняемые 
на ЭВМ программы или фрагменты больших систем. 

На рис. 1.1 показана тривиальная программа инвентаризации 
в книжном магазине. Она работает с инвентарным файлом, в ко- 
тором представлены номера книг и их количество, и обрабатывает 
запросы на закупку книг в соответствии с данным инвентарным 
файлом. Программа действительно работает (поразительно!). 
Теперь постарайтесь проанализировать, что делает программа 
и как. 

В оставшейся части главы мы опишем некоторые ошибки, до- 
пущенные в программе. Вы также познакомитесь со структурой 
программы и ее отладкой. После этого вам, возможно, захочется 
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Рис. 1.1. Пример — программа инвентаризации книг, (Текст в инстр. 704: 
«Ошибка».) 
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переделать программу. Однако мы не будем исправлять приве- 
денную программу, чтобы сделать ее хорошей. Мы надеемся, что 
она просто послужит вам серьезным уроком. Иногда лучше выб- 
росить плохую программу, чем пытаться ее исправить. 


1.2. Документация _ 


Когда вы встречаетесь с термином «документация», вы, вероят- 
но, полагаете, что речь идет о комментариях внутри программы. 
Это правильный, но только неполный ответ. Существует внутрен- 
нее и внешнее описание программы. «Внешняя документация» не- 
обходима для распространения программ между пользователями, 
которые реальную исходную программу могут никогда не уви- 
деть. Внешняя документация удобна также для описания про- 
граммы в тех случаях, когда размеры описания слишком велики 
для того, чтобы уместить его в комментариях. Комментарии (часть 
«внутренней документации») дают всевозможные пояснения 
к программе, помогают пользователю (да и самому разработчику) 
анализировать исходный текст программы. 


1.2.1. Внешняя документация 


Внешняя документация предназначена для двух различных 
групп людей: для тех, кто пользуется программами, и тех, кто 
занимается их эксплуатацией. Внешняя документация для поль- 
зователей программ содержит информацию, позволяющую рабо- 
тать с данной программой. Такая документация называется ру- 
ководством для пользователей и содержит следующие сведения: 


. Имя программы. 

Краткое описание того, что делает программа. 

. Форма и смысловое значение данных, вводимых в про- 

грамму. | 

. Вывод из программы и способы управления объемом выво- 

да или типом выводимых данных. 

‚ Необычные ситуации в программе, ограничения и недос- 

татки применяемого метода. | 

. Пример результатов работы программы, показывающий 

в полном объеме входные данные и соответствующий им 
ВЫХОД. 

7. Сведения об авторах программы или специалистах по ее 
эксплуатации для контакта с ними в случае ошибочных 
результатов. | 

8. Благодарности и ссылки на литературу. 


© м в фФю- 


В одних программах какие-то из перечисленных сведений 
необходимо изложить более подробно, в других нужно уделить 
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больше внимания чему-то еще. С приобретением опыта вы смо- 
жете сами решать, как лучше документировать программы. 

Теперь давайте сравним то, что предлагается, с тем, что име- 
ется в приведенном нами плохом примере. Данному примеру 
предшествовал один абзац пояснений. Если бы было нужно вос- 
пользоваться этой программой, то нам было бы неизвестно ни 
как подготовить для программы входные данные, ни как интер- 
претировать вывод. Таким образом, вы уже можете вполне оце- 
нить значение руководства для пользователя. 

Недостатки внешнего описания приведенной программы даже 
более существенны для того, кто ее эксплуатирует. Если вам по- 
надобилось бы расширить эту программу или откорректировать 
какие-либо неверные результаты, это было бы сделать непросто. 
К сожалению, эта программа — типичный представитель «про- 
изводственных» программ: она работает правильно при «стан- 
дартных» входных данных, т. е. на тестовых данных автора и пер- 
вом наборе реальных данных, на которых программа выполня- 
лась. Однако существует множество наборов данных, на которых 
программа не будет работать правильно. В конце концов одна из 
скрытых ошибок проявится. Если к вам обратятся с просьбой 
исправить данную программу, неизвестно даже, с чего начать 
поиск ошибки. 

Внешняя документация для обслуживающего персонала ча- 
сто называется руководством по логике программы (Ргоогат 
Гоб1с Мапиа|, сокращенно РЕМ), поскольку в нем объясняется 
логическая структура программы. Такое руководство обычно 
содержит следующие разделы: 


. Назначение программы. 

. Имена и назначение модулей программы. 

. Последовательность вызова модулей — список модулей, 
вызываемых каждым модулем. 

Имена и смысл основных переменных. 

Ход выполнения программы — последовательность дей- 
ствий во время выполнения программы. 

Описание средств, способствующих отладке программы, 
и способы их использования. 

Расширения, запланированные автором программы, и 
методика связи этих расширений с оставшейся частью про- 
граммы. 


ох дк фе 


И в данном случае перечисленная информация различна 
для различных программ. Вы должны представить себя в роли 
потенциального пользователя программы или обслуживающего 
ее программиста и попытаться предвосхитить вопросы или проб- 
лемы, которые возникнут перед теми, кто будет работать с вашей 
программой. 


3% 


= 


68 | Гл. 1. Стиль программирования 


Мы говорили о руководстве для пользователей и о руководстве 
по логической структуре программы так, как если бы они были 
составлены после написания программы. Хотя конечная шли- 
фовка документации делается постфактум, содержание этих 
руководств представляет собой важную и неотъемлемую часть 
построения программы. И наконец, если описания помогут кому- 
нибудь другому понять или использовать исходный текст про- 
граммы, разве они не помогут вам сделать то же самое в процессе 
создания или отладки программы? 

Возьмем, например, имена модулей, параметров и их назна- 
чение. Это, безусловно, важная часть проектирования программы. 
Обычно вначале мы упрощаем проблемы, связанные с деталями 
работы каждого отдельного модуля, и занимаемся лишь прин- 
ципиальной схемой их взаимодействия. Мы предпочитаем в пер- 
вую очередь сосредоточить внимание на основных моментах ра- 
боты программы, а затем уже переходим к рассмотрению дета- 
лей. (Такой метод построения программы называется пошаговой 
разработкой. Мы воспользуемся позднее этим методом в разд. 1.9, 
чтобы заново переделать приведенную выше программу.) 


1.2.2. Внутренняя документация 


Автор приключенческого романа должен проделать две вещи. 
Прежде всего он должен описать время и место действия ро- 
мана, обозначить интригу и представить своих героев. После 
того как читатель разберется в обстановке, можно вести изложе- 
ние, следуя сюжетной линии. Аналогичная последовательность 
имеет место не только в художественном произведении. Эта кни- 
га, например, началась с вводной главы, чтобы все читатели 
имели определенную минимальную степень подготовки; после 
вводных замечаний был представлен новый материал. 

При написании программ для ЭВМ необходимо следовать тем 
же правилам. Прежде всего вы должны представить вашу про- 
грамму: что это за программа, как (обычно) она работает, какие 
имеет входы и выходы, какие ключевые переменные? После та- 
кого введения вы можете продолжить построение программы, 
зная, что любой читатель сможет проследить за тем, что вы 
намереваетесь сделать и приблизительно как вы это сделаете. 

По этой причине мы разделим внутреннюю документацию на 
две части: «шапку» или «блок комментариев», располагаемый 
в верхней части программы, и «пошаговые комментарии» внутри 
программы. 

Мы будем выносить обычно следующую информацию в блок 
комментариев: 


1. Имя программы и ее более подробное название. 
2. Имя программиста. 
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Дату (и номер версии, если программа существенно изме- 
нена). 

. Сжатое изложение того, что должно быть сделано, краткий 
обзор используемого алгоритма, план порядка действий. 
. Ожидаемые входные данные. 

Имена и назначение основных переменных. 

. Вызываемые подпрограммы. 

‚ Используемые нестандартные или системно-зависимые 
средства (их следует по возможности избегать). 

.‚ Необычные условия или аварийные ситуации, которые могут 
возникнуть при выполнении программы. 


© чом в 6 


Сравните эти положения с «шапкой» программы на рис. 1.1. 
Покажем теперь, какой вид имело бы описание, если бы мы соста- 
вили его в соответствии с вышеизложенными рекомендациями: 


ПРОГРАММА ВГМ@О — ВООК ТМУЕМТОКУ СЕМЕКАТОК 
ИНВЕНТАРИЗАЦИИ КНИГ` 


ПРОГРАММА СЛЕДИТ ЗА СПИСКОМ НОМЕРОВ КНИГ И ИХ КОЛИ- 
ЧЕСТВОМ. 


ПРОГРАММА ДЕЛИТСЯ НА ЧЕТЫРЕ ФАЗЫ: 


1. ЧТЕНИЕ ПЕРФОКАРТ, СОДЕРЖАЩИХ НОМЕРА КНИГ, ИМЕЮ- 
ЩИХСЯ В НАЛИЧИИ, И ИХ КОЛИЧЕСТВО; 

2. СОРТИРОВКА ИНВЕНТАРНЫХ ДАННЫХ В ВОЗРАСТАЮЩЕМ 
ПОРЯДКЕ ПО НОМЕРАМ; 

3. ЧТЕНИЕ ПЕРФОКАРТ, СОДЕРЖАЩИХ НОМЕРА И КОЛИЧЕСТВО 
ПРОДАННЫХ КНИГ: 

4. ПЕЧАТЬ ОТЧЕТА ОБ ИМЕЮЩИХСЯ В НАЛИЧИИ КНИГАХ И ИХ 
КОЛИЧЕСТВЕ. 


ВХОДНЫЕ ДАННЫЕ: 


1. ПЕРФОКАРТА-ЗАГОЛОВОК, УКАЗЫВАЮЩАЯ, СКОЛЬКО ПЕР- 
ФОКАРТ БУДЕТ СЧИТАНО В ФАЗЕ [ И ФАЗЕ 3 (ПО ОДНОМУ 
НОМЕРУ КНИГИ НА ПЕРФОКАРТЕ) 

2. ПЕРФОКАРТЫ С НОМЕРАМИ ИМЕЮЩИХСЯ В НАЛИЧИИ КНИГ 
И ИХ КОЛИЧЕСТВОМ ДЛЯ ФАЗЫ 1 

3. ПЕРФОКАРТЫ С НОМЕРАМИ ПРОДАННЫХ КНИГ И ИХ КОЛИ- 
ЧЕСТВОМ ДЛЯ ФАЗЫ 3 


ОСНОВНЫЕ ПЕРЕМЕННЫЕ: 
МВООК$ — СКОЛЬКО ПЕРФОКАРТ «КНИГА — КОЛИЧЕСТВО» ДЛЯ 


МАГЕ$ — СКОЛЬКО ПЕРФОКАРТ «КНИГ А — ПРОДАННОЕ КО- 
ЛИЧЕСТВО» ДЛЯ ФАЗЫ 3 

ВООКМО — МАССИВ НОМЕРОВ КНИГ 

ОТУ — ИМЕЮЩЕЕСЯ В НАЛИЧИИ КОЛИЧЕСТВО — ОТУ (1) 
ЭТО КОЛИЧЕСТВО ВООКМО(Т) 

СВООК — ТЕКУЩИЙ ОБРАБАТЫВАЕМЫЙ НОМЕР КНИГИ 

МЕМТКУ — ЧИСЛО ЭЛЕМЕНТОВ В МАССИВАХ ВООКМО И ОТУ 


ПРОГРАММИСТ: —— ДАТА; ——— 
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Очевидно, что такое описание сообщает гораздо больше ин- 
формации, чем одиночный комментарий — заголовок в исходной 
программе. (Заметим также, что данное описание дает ключ 
к тем структурным изменениям, которые мы в дальнейшем про- 
изведем.) 

Теперь проанализируем оставшиеся описания внутри нашей 
программы-примера. Два комментария информируют о циклах 
РО (которые вы, конечно, заметили бы и без комментария), 
два комментария предупреждают об ошибке, которая может про- 
изойти, не объясняя источника или типа ошибки. Другие ком- 
ментарии говорят что-то о «новых картах», «старых картах» 
или «первом разе». Короче, комментарии внутри программы не 
дают читателю практически никакой информации. 

По нашему мнению, следующие рекомендации способствуют 
эффективному документированию: 


1. Используйте комментарии, которые описывают назначе- 
ние сегмента программы, не повторяя информации, содержащейся 
в самой программе. Такой комментарий, как «ПРИБАВИТЬ 1 
К СЧЕТЧИКУ», предшествующий СООМТ=СОоЧМТ-1, намно- 
го менее полезен, чем «УВЕЛИЧИТЬ СЧЕТЧИК ПРОЧИТАН- 
НЫХ КАРТ С ДАННЫМИ». 


2. Не комментируйте каждую инструкцию. Цель коммента- 
рия — объяснить характер действий в программе. В каждой 
отдельной инструкции довольно редко проявляются какие-либо 
действия, и поэтому нет необходимости описывать каждую ин- 
струкцию отдельным комментарием. Комментарии должны помо- 
гать следить за выполнением программы. 


3. Используйте комментарии для разделения программы на 
отдельные подразделы. Такие подразделы содержат обычно от 
5 до 10 инструкций и имеют одноцелевое назначение. 


4. Используйте больше комментариев при разделении про- 
граммы на крупные фазы. Такая фаза представляет собой одно- 
целевой блок, как правило, длиной не более страницы. 


5. При расположении комментария часто бывает полезно 
делать отступ от текста программы. Так, для инструкций, на- 
чинающихся в колонке 7, комментарии можно начинать примерно 
с колонки 15. Такая отбивка позволяет читать отдельно коммен- 
тарии и текст программы. 


Вы можете обратиться к программе, приведенной в конце 
гл. 0, чтобы сравнить документацию этой программы с изложен- 
ными здесь положениями. Сейчас мы не будем показывать ком- 
ментарии, которые следовало бы использовать в примере про- 
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граммы, приведенном в настоящей главе. Однако, когда мы 
займемся изменением этой программы и в других аспектах, мы 
включим комментарии, придерживаясь изложенных здесь стан- 
дартов. Окончательно откорректированная программа приведена 
в разд. 1.9. 


1.2.3. Дополнительные рекомендации 


До сих пор мы описывали внутреннюю документацию исклю- 
чительно в терминах комментариев. Но точное значение глагола 
«документировать» означает давать информацию. Поэтому, даже 
если внутри программы что-либо сделано в этом плане, то это 
является частью документации. Нижеследующие советы помогут 
сделать вашу программу более выразительной. 


1. Выбирайте осмысленные имена. Х =У/Т дает гораздо мень- 
ше информации, чем АУ@=зОМ/М. 


2. Не забывайте правило 1—М для обозначения целых пере- 
менных. Программисты давно уже привыкли к нему и автомати- 
чески считают, что переменные, начинающиеся с Г, ., К, [., 
М, М, — это целые. Чтобы помочь читателю вашей программы, 
следуйте этому соглашению во всех возможных случаях. 

а) Имена [, Г, Ки М должны всегда обозначать целые. (По 

соглашению [, Ги К должны использоваться также только в 

качестве счетчиков индексов циклов или массивов индексов.) 

6) Однако в некоторых случаях не следует ломать осмыслен- 

ные имена, с тем чтобы они соответствовали стандартному 

соглашению. Имена вещественных переменных, такие, как 

МШЕЗ или МЕОТАМ, не следует заменять на ХМШЕЗ или 

ЕМОТАМ только для того, чтобы подогнать под это правило. 

Цель состоит в том, чтобы улучшить наглядность программы, 

но не делать ее неясной. Трудно улучшить такие имена, как 

МШ.Е$ или МЕШ]ТАМ. 


3. Придерживайтесь очевидного порядка действий. Если 
надо вычислить 


^В+УР?—4ас 
2а 
ТО ..72” 


`РЗСАМ = 01782 = 4% С} 
АООТ(1) = (-8+0$САМ) / (2%А} 
&00Т{2) = {-В-05С8М} И (2*А) 


конечно, а понятнее, чем 


\ 


СЕМ 84-44980. 5. 

10 80042-04411 /2) в (-8 + вОЗСАМ / (244) 
=> 
ТЕ (3 „ЁТ. 0) СО ТО 10 
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4. Прерывайте длинные инструкции на доступные для пони- 
мания фрагменты; избегайте, однако, излишне мелкого дробле- 
ния. Во-первых, человеческий мозг может помнить активно в 
любой конкретный момент времени около пяти «единиц» информа- 
ции. Поэтому за сложными выражениями, состоящими более 
чем из пяти нетривиальных частей, нелегко проследить. Во-вто- 
рых, чем длиннее выражение, тем больше потенциальных возмож- 
ностей для появления Лишних скобок, неправильных знаков 
операций и ошибочных переменных. Целесообразно поэтому 
разделять длинные инструкции на части, за которыми можно 
проще следить и которые легче отлаживать. Вышеприведенное 
выражение, вычисляющее дискриминант квадратного уравнения, 
является примером такого разделения длинного выражения. 


5. Аналогично используйте дополнительные скобки и про- 
белы, чтобы яснее подчеркнуть ваши намерения. 
Выражение вида 


ГЕ (А--(В*С) .СТ. 8 .ОЮ. (Г .1Т. 5 .АМО. $ .ОТ. 2)) @О ТО 10 


понять легче, чем 
1Е (А-В*С.С@Т.8.ОЮ.1.Г.Т.5.АМО. ].СТ.2) СО ТО 10 


6. Использование отступов в тексте программы является 
мощным средством, позволяющим сделать программу более вы- 
разительной. Квалифицированные программисты, работающие на 
языках ПЛ/Г и Алгол, уже в течение ряда лет используют этот 
метод, но программирующие на Фортране только сравнительно 
недавно отошли от привычки начинать каждую инструкцию с 
седьмой колонки. Целесообразно писать с отступом ОО-циклы и 
[Е-группы. Рассмотрим следующий пример: 


00 200 НОЦВМО = 1, 24 
МАТТЕ (ТООТ, 100} НОУВМО 
100 РОВМАТ(\ РВОСВЕЗ$ ВЕРОВТ ЕОВ НОА", 14) 
00 150 Тт= Ем 
$УМ=$ИМ+Х(Т) 
1Е (Х(Т).1Е.10} 60 ТВ 120 
Х(11=Х(11-10. 


| С0 ТО 150 

120 МВ {ТЕ ( 100Т,125} Т, Х(ЕТ} 

125 ЕОВМАТ(* ЗАМРЕЕ ', [12,' НАЗ УАЩЩЕ #7. 210.4) 
ХТ) =0 = 


150 — СОМТТМОЕ 
МАТТЕ( 100Т,175} $0М 
15 — РОВМАТ(® ТОТАЕ $0М РОК ТН1$ НОУВ 1$', 212.4}. 


$9М=0. .„. . 
200 СОМТТМУЕ | 
— ЗТОР 


ЕМО 
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Даже не понимая сущности задачи, легко видеть структуру 
этой программы. Следующие рекомендации, по нашему мнению, 
полезно соблюдать при оформлении текста программы: 

(а) Тело цикла следует начинать на три пробела правее его 
первой и последней инструкций. Это относится как к 
обычным, так и к «самодельным» циклам РОО (т. е. циклам, 
в которых по ряду причин необходимо использовать 
инструкции и СО ТО). 

(6) Следующие за [Е инструкции, выполняемые при условии 
«ложно», МОЖНО Также располагать на три пробела правее 
начала инструкции [Ё, если этих инструкций больше чем 
одна. Например, 


ТЕР (Х(Т) „ЕЕ. Х(1+1)} 60 ТО 40 
ТЕМР = Х(Г} 
ХТ) = Х( 1+1} 
Х(1+1) = ТЕМР 
40 СОМТТМИЕ 


(в) Можно расположить правее седьмой колонки одну или 
обе группы инструкций в конструкции Е-ТНЕМ-ЕГЗЕ. 
(Конструкция 1Е-ТНЕМ-ЕТЗЕ описана в разд. 1.3.2. Это 
просто форма инструкции ПЕ, в которой выполняются два 
различных действия в зависимости от проверяемого ус- 
ловия «истинно» или «ложно»). Ниже приведен пример 
расположения текста в конструкции 1Е-ТНЕМ-ЕЁЗЕ: 


1Е (НОия$ „СТ. 40.) 60 ТО 450 
РАУ = ВАТЕ*НСИВ$ 
ТАХ = 0.23>РАУ 
С0 ТО 500 
450. РАУ = ВАТЕЖНОЙВ$ + 0.5%8ВАТЕХ( НОЦ $-40.) 
ТАХ = о23З*РАУ + *ОВ®ВАТЕ*(НОЦЯ5-40.}_ 
МОУВТ = МОУРТ+1 
`500 МЕМР = МЕМР+1 


(г) Удобнее читать РО — циклы и большинство самодельных 

циклов, если цикл оканчивается инструкцией СОМТ1МУЕ. 

Мы советуем использовать метод отступов, чтобы сделать 

программу нагляднее. Странно, но факт — программы, для кото- 

рых вы нашли время тщательно расположить текст, легче под- 
даются отладке. 


7. Используйте последовательные, логически связанные но- 
мера инструкций. Если вы встречаете инструкцию СО ТО 675 
в середине программы, а последний номер инструкции, который 
вы видели, был 403, то вы сочтете, что номер 675 расположен 
ниже в программе. Квалифицированные программисты исполь- 
зуют номера инструкций (наряду с комментариями, конечно) для 
информирования о начале новой секции программы. Каждая сек- 
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ция имеет свой собственный диапазон номеров инструкций 
(например, от 1000 по 1999, от 2000 по 2999 и т. д.), и все номера 
инструкций внутри такой секции принадлежат этому диапазону. 
Тогда, если секции делятся на подсекции, то каждая подсекция 
составляет часть диапазона секции (с номерами инструкций от 
1000 по 1199, от 1200 по 1399 ит. д.). При таком подходе легко 
находить номера инструкций и следить за связанными блоками 
программы. 


8. Избегайте имен переменных и номеров инструкций, кото- 
рые легко спутать, например такие имена, как МЕАМ и МЕЕМ 
или Ги П, номера инструкций 1883 и 1383 или 9099 и 9909. 
Они могут вызвать трудности при написании программы; ката- 
строфические результаты из-за невинных ошибок в набивке; 
могут сделать программу трудной для чтения. 

В итоге всегда следует иметь в виду, что кто-то, может быть, 
даже и вы, будет читать вашу программу. Эксплуатация про- 
грамм — задача не тривиальная. Если вам понадобится вернуть- 
ся вновь к вашей программе спустя год после ее написания, или 
кто-нибудь другой попытается понять логику работы вашей про- 
граммы, или вам будет необходимо понять логику работы чьей- 
либо еще программы, вы скажете спасибо, если программа легко 
читается. 


1,3. Структура программы 


Вероятно, вы уже в состоянии написать некоторые довольно 
сложные программы (длиннее 30 инструкций). В коротких про- 
граммах различие в структурах обычно оценить трудно из-за 
недостаточной сложности реализуемого алгоритма. Структуры 
программ, как и документация, отличаются у различных про- 
граммистов и в различных проектах. Мы хотим, чтобы вы прочи- 
тали этот раздел и поняли, почему мы рекомендуем описанные 
здесь методы. 


1.3.1. Дискуссия об инструкции СО ТО 


В 1968 г. известный ученый Едсгер Дейкстра написал ста- 
тью, в которой, в частности, отметил, что использование инструк- 
ции СО ТО затрудняет чтение программ. Справедливость этого 
заявления бесспорна для всех, кто имел дело с большим количе- 
ством фортранных программ. Суть его предложения состояла в 
том, чтобы подтолкнуть разработчиков будущих языков програм- 
мирования к созданию достаточно богатого словаря структур 
управления, с тем чтобы отпала необходимость в инструкции @О 
ТО. Это заявление Дейкстры привлекло достаточно много вни- 
мания, чтобы рассмотреть подробнее его мотивировку. 
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Дейкстра исходил из того, что язык должен содержать сред- 
ства для управления циклами, для выполнения альтернативных 
действий, зависящих от одного или нескольких условий, для 
выбора одной из групп инструкций, которые должны выполнять- 
ся в том или ином «подслучае». 

Проблема состоит в том, что язык Фортран применяется уже 
на протяжении более 20 лет. Он обновлялся несколько раз, но 
реализация предложений, подобных высказанным Дейкстрой, 
привела бы к существенному изменению языка. При каждом из- 
менении Фортрана сохранялась преемственность — максимально 
возможная совместимость «вверх»: программа, которая компили- 
ровалась в старом стандарте языка, должна была компилиро- 
ваться и в новом стандарте. (Конечно, расширения и новые 
средства языка означают, что не все программы, компилирую- 
щиеся в новом стандарте, могут компилироваться в старом.) 
По существу, мы не можем ожидать каких-либо принципиальных 
изменений в Фортране; необходимо научиться разумно пользо- 
ваться тем, что уже существует. 

Люди часто ищут легких, автоматических путей решения 
проблем. Проще всего сделать такое следствие из заявления Дей- 
кстры: если программа, содержащая инструкции ОО ТО, пло- 
ха, то программа без инструкций @О ТО должна быть хорошей. 
Это неверно! Используя сложные вложенные РО-циклы и вы- 
зовы подпрограмм, скудные пояснения, нелогично упорядочен- 
ные инструкции и другие подобные хитрости, можно написать 
совершенно непонятную программу, но без инструкций СО ТО. 
Таким образом, программа, в которой нет СО ТО, не будет 
непременно хорошей программой. 

На Фортране можно написать хорошую программу, несмотря 
на то что Фортран имеет ограниченный набор структур управ- 
ления. Даже не обладая изощренными инструментами, мастер. 
может создать прекрасную вещь. 

Одним из достоинств Фортрана является его стандартизован- 
ность; это означает, что программы, написанные на стандартном 
Фортране, можно выполнять на самых различных машинах. 
Более того, Фортран — сравнительно простой язык; поэтому 
компиляторы Фортрана относительно небольшие и в связи с этим 
доступны для большого числа мини-ЭВМ. Фортран — широко 
распространенный язык; может оказаться, что вы просто най- 
дете необходимую вам программу, и ее не нужно будет писать 
самому. Существует большое число хорошо проверенных ком- 
пиляторов; некоторые из них имеют специальные средства, та- 
кие, как вспомогательные средства отладки или оптимизация 
объектного кода. Наконец, что самое главное в этой дискуссии, 
желаемые средства управления можно смоделировать в стандарт- 
ном Фортране зачастую без существенной потери эффективности и 
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удобочитаемости. Таким образом, язык Фортран полностью 
удовлетворяет требованиям, которые предъявляются к языку 
высокого уровня при решении по-настоящему сложных задач. 

Специалисты разработали расширенные или «структурные» 
процессоры Фортрана. Обычно такие процессоры имеют форму 
предпроцессора, который воспринимает на входе программы 
расширенной версии Фортрана и создает в качестве выхода 
эквивалентную стандартную программу на Фортране; эта про- 
грамма вводится в компилятор Фортрана, который генерирует 
объектный код. 

Указанные процессоры не стандартны. Более того, сущест- 
вует много процессоров, но нет соглашения, какие расширения 
обязательны. Создано много различных диалектов «структурного 
Фортрана». Если вы будете пользоваться таким процессором, 
то сузится круг машин, на которых можно выполнять вашу 
программу. Программу можно будет выполнять лишь на той 
машине, на которой вы работаете, или на той, которая имеет 
совместимый процессор. При этом полностью теряется одно из 
главных преимуществ Фортрана — мобильность (портативность) 
написанных на нем программ. 

С другой стороны, упомянутые выше процессоры могут по- 
зволить программировать алгоритмы в более «естественном» 
синтаксисе. Однако само по себе это еще не улучшает программ 
точно так же, как не улучшает их автоматическое исключение 
инструкций СО ТО. Если вы располагаете предпроцессором 
и вас устраивают расширения, которые он обеспечивает, возмож- 
но, вы захотите воспользоваться таким процессором. Его приме- 
нение, правда, несколько увеличит время компилирования про- 
граммы. Мы придерживаемся, однако, такого мнения, что нем- 
ного машинного времени гораздо менее ценно, чем длительное 
время работы программиста. Если такие средства могут помочь 
вам программировать быстрее или с менышим числом ошибок, 
дополнительные затраты на машинное время будут оправданы. 


1.3.2. Структуры управления 


В этом разделе мы покажем несколько структур, используе- 
мых в хороших алгоритмах. Грамотные программисты применяют 
такие конструкции уже в течение длительного времени. Проана- 
лизируйте их и запомните, они пригодятся вам при решении 
ваших задач. Вы найдете, мы в этом уверены, что алгоритмы ре- 
шения многих задач могут быть естественно выражены с исполь- 
зованием изложенных ниже конструкций. 


1. Е-ТНЕМ. Если условие удовлетворяется, то выполнить 
определенную группу инструкций. Эту форму можно применять 
в таких случаях, как сортировка (если два элемента расположе- 
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ны не по порядку, то поменять их местами); системах инвента- 
ризации (если существует достаточное количество товара х, 
то обработать запрос на продажу количества у товара х); при мо- 
делировании (если надо реализовать еще какие-то события, то 
взять первое событие и реализовать его). Эффект достигается 
логической инструкцией Е, как показано ниже: 


`` ТЕ (МАМЕСТ) ЕЕ .МАМЕ(1+1)) 63 ТО 50 
ТМАМЕ = МАМЕСТ) 
МАМЕ(1) = МАМЕ(Т+\ ) 

МАМЕ ( 1+1) = ТМАМЕ 

50 Т = 1+1 


2. 1Е-ТНЕМ-ЕТЗЕ. Если условие удовлетворяется, то будет 
выполнена одна группа инструкций программы; в противном 
случае выполняется другая группа инструкций. Обе альтернатив- 
ные группы часто вновь сходятся на общей для обеих групп 
инструкции. Эта конструкция представлена в Фортране или 
двумя инструкциями Ш, или одиночной инструкцией Ш и па- 
рой инструкций СО ТО. В структуре с двумя инструкциями Е 
одна инструкция проверяет требуемое условие, вторая — обрат- 
ное условие (логическое .МОТ.). При использовании одной Е 
и двух инструкций ОО ТО программа имеет вид 


ТЕ (УСЛОВИЕ) СО ТО $№ 
ИНСТРУКЦИИ, ВЫПОЛНЯЕМЫЕ, ЕСЛИ УСЛОВИЕ ЛОЖНО 


К: — ИНСТРУКЦИИ, ВЫПОЛНЯЕМЫЕ, ЕСЛИ УСЛОВИЕ ИСТИННО 
$№ — СЛЕДУЮЩАЯ ИНСТРУКЦИЯ 

3. Циклы. Применяются, когда требуется повторное выпол- 
нение ряда действий в зависимости от условия. Может быть 
задано условие на определенное число повторений, или пока 
справедливо определенное утверждение, или пока не произойдет 
определенное событие, условие может быть некоторой комбина- 
цией других условий. С этой формой мы встречаемся, например, 
при приближенном вычислении квадратного корня, если указа- 
на требуемая точность или требуемое число итераций; при по- 
иске в таблице некоторого конкретного значения, который про- 
должается до тех пор, пока это значение небудет найдено или не 
будет просмотрена вся таблица. Обычно такую конструкцию 
можно реализовать инструкцией РО. В языках ИЛЛ, Алгол, 
Кобол, Паскаль она действительно реализуется единственной 
инструкцией цикла. Но даже в Фортране 77 инструкция РО 
так ограничена, что сложные циклы часто реализуются с исполь- 
зованием инструкций [Е и СО ТО. Циклы 1Е/@О ТО применя- 
ются при наличии двух необходимых независимых условий 
останова, при постоянном шаге приращения, когда нужно про- 
верить условие завершения цикла перед началом его выполне- 
ния, а не после. Существует два классических типа циклических 
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инструкций: с проверкой окончания ‘цикла до и после выполне- 
ния тела цикла. Инструкции цикла имеют также названия ОО- 
\УНТЁЕ и КЕРЕАТ-ОМТИ.. 


4. Выбор варианта. Применяется, когда нужно перейти на 
ту или иную группу исполняемых инструкций в зависимости от 
значения переменной. Все группы инструкций передают управ- 
ление в общую точку, расположенную после последней группы. 
В качестве примера применения такой конструкции может слу- 
жить программа, следящая за книгами в библиотеке; такой 
программе требуется выбор одного из нескольких действий, 
а именно: приобретение новой книги, выдача книги, возврат 
книги, изъятие книги из обращения, «координаты» нужной кни- 
ги, имя читателя книги и т. п. В некоторых языках эта конструк- 
ция реализована непосредственно, но в большинстве языков 
программист должен ее смоделировать, используя вычисляемый 
СО ТО. При небольшом числе возможных вариантов конструк- 
ции |Е-ТНЕМ-ЕЁЗЕ, по-видимому, предпочтительнее, чем вы- 
числяемый СО ТО. Важно иметь хорошую документацию при 
работе с этой формой. В программе, использующей вычисляемый 
СО ТО, инструкция выбора варианта имеет следующий вид: 


С СО ТО ($М1, $№, ..., $ММ), ДЕЙСТВИЕ 


С ПЕРВЫЙ СЛУЧАЙ 
$№1 ФРАГМЕНТ, ВЫПОЛНЯЮЩИЙСЯ В СЛУЧАЕ 1 


СО ТО $мМХ 
С ВТОРОЙ СЛУЧАЙ 


$№2 ФРАГМЕНТ, ВЫПОЛНЯЮЩИЙСЯ В СЛУЧАЕ 2 
СО ТО $мх 
С _ ПОСЛЕДНИЙ СЛУЧАЙ 
`$ММ ФРАГМЕНТ ДЛЯ ПОСЛЕДНЕГО СЛУЧАЯ 


со ТО $мХ 


С ОБЩАЯ ТОЧКА ВСЕХ ГРУПП 
З$МХ ОСТАЛЬНАЯ ПРОГРАММА | 


5. ПОДПРОЦЕДУРЫ. Отдельный блок программы для вы- 
полнения специфических действий. Такая конструкция полезна, 
(а) когда должны быть выполнены примерно одни и те же дейст- 
вия в нескольких местах программы, возможно, с разными 
наборами данных; (6) когда относительно независимый набор 
операций может быть выделен из оставшейся части программы, 
чтобы ее было удобнее читать; (в) когда сегмент программы может 
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быть отдельно написан и отлажен. Обычно это реализуется в 
Фортране с помощью подпрограммы или функции. 


Приведенные пять структур управления — это основные 
структуры, которые применяют квалифицированные програм- 
мисты. Мы убедительно просим вас изучить эти структуры и 
использовать их как можно чаще при решении ваших задач. 
Может показаться слишком сильным утверждение, что все задачи 
поддаются решению при использовании указанных. конструк- 
ций, однако, по-видимому, естественное решение большинства 
задач укладывается в эти рамки. 

В разд. 1.2 вы убедились, какое важное значение имеют ком- 
ментарии при подготовке программы для тех, кто с ней работает. 
Аналогично комментариям приведенные структуры управления 
помогают читателю понять вашу программу. Прежде чем чита- 
тель начнет просматривать некий фрагмент программы, ему 
полезно узнать, что этот фрагмент является частью структуры 
цикла. Заметим также, что инструкции в рассмотренных струк- 
турах выполняются по принципу «сверху вниз». Все переходы 
(ОО ТО) передают управление к точкам, расположенным ниже 
в теле программы, за исключением структур цикла. В структури- 
рованных программах управление организовано именно таким 
образом. 


1.4. Защита от ошибок при программировании 


Во всех без исключения достаточно сложных программах 
есть ошибки. Ошибки могут возникнуть от разных источников, 
например от непонимания задачи, плохой программы, набивки 
инструкций с ошибками. Обычно над такими источниками ошибок 
имеет контроль сам программист. 

Другие потенциально возможные источники ошибок находят- 
ся вне сферы действий программиста, например ошибки во вход- 
ных данных. В коммерческих системах, когда первоначальная 
отладка программы завершена, программист передает программу 
потребителям и не может предотвратить такие ошибки, которые 
возникают при вводе неправильно набитых данных, при невер- 
ном расположении или пропуске данных, при отсутствии карт с 
признаком конца данных. 

В программе следует предусмотреть защиту от ошибок во 
входных данных. Программу можно защитить от ошибок, руко- 
водствуясь следующими соображениями: 


1. Минимизируйте ограничения на ввод. Пользуйтесь спе- 
циальной перфокартой для сигнализации о конце входной коло- 
ды перфокарт вместо заглавной перфокарты, содержащей коли- 
чество вводимых перфокарт. В подсчете перфокарт легко оши- 
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биться. Если ваш компилятор позволяет, то лучше применять 
операнд ЕМО = в инструкции КЕАРО, чем пользоваться перфо- 
картой с признаком конца колоды. 


2. Следите за допустимыми значениями входных данных. Во 
многих случаях существует четкий диапазон входных значений. 
Например, число рабочих часов служащего в неделю должно на- 
ходиться в диапазоне между 0 и 7*24 часа, а вес человека — 
между [и 200 кг. В этом смысле программа должна проверять 
каждое входное значение. 


3. Для контроля выводите входные данные на печать. Сле- 
дует печатать все считываемые данные непосредственно после 
ввода; такой вывод должен быть четко оформлен. Указанный 
метод поможет вам или пользователю точно проследить по лис- 
тингу, какие значения введены в программу (что особенно по- 
лезно, если какие-то данные были набиты на перфокартах оши- 
бочно). При отладке программы в этом случае вы будете распола- 
гать значениями всех данных, которые были введены в программу, 
и сможете проконтролировать работу программы вручную. 


4. Во-время останавливайте выполнение программы. Если 
программа ожидала, но не получила входные данные, следует 
напечатать сообщение об ошибке и прекратить выполнение 
программы. Точно так же, если вы ожидали получить ненулевое 
значение, а получили в результате нуль (возможно, из-за того, 
что в соответствующей колонке перфокарты ничего не было 
пробито), не следует продолжать выполнение программы и по- 
рождать ошибочные результаты. В общем всякий раз, когда 
программа сталкивается с неприемлемой ситуацией любого вида, 
следует печатать сообщение об ошибке и прекращать выполнение. 
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Программисты кажутся невероятными оптимистами. Начи- 
нающие программисты считают, что если в программе нет синтак- 
сических ошибок, то программа правильна. Опытные програм- 
мисты допускают наличие семантических ошибок. Однако, не- 
смотря на совершенную очевидность противного, они полагают, 
что каждая программа будет правильно выполняться с первого 
раза. Начинающие программисты, даже допуская, что вначале 
их программы не будут свободны от ошибок, все же думают, что, 
когда они наберутся опыта, эта ситуация изменится. Но это 
ошибочно. Требуется очень большой опыт для понимания того, 
что ошибки программирования всегда будут иметь место и что 
нужно заранее принять меры, облегчающие, насколько это 
возможно, их обнаружение. 
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1.5.1. Средства отладки 


Отладка — это исследовательская, экспериментальная рабо- 
_та. Важно знать методы отладки и научиться успешно применять 
их. Ниже описаны некоторые средства отладки, которые мы 
находим полезными. 


1. Изучите доступные вам средства отладки. 

Многие компиляторы допускают расширения Фортрана, кото- 
рые в случае ошибок в программе дают дополнительную информа- 
цию пользователю. Компилятор \МАТЕУ, например, обрабаты- 
вает инструкцию РУМРЫЗТ, а для Фортрана-10 фирмы РЕС 
имеется пакет ЕОК-ООТ, и даже «промышленный» компилятор с 
Фортрана а фирмы [ВМ позволяет. использовать средства отлад- 
ки (РЕВОО). Мы не будем вдаваться в подробности каждого из 
указанных средств отладки, поскольку они содержат массу 
всевозможных особенностей. Часто обеспечиваемые ими услуги 
включают: 

(а) Завершающий дамп. В случае ненормального окончания 
задания (а иногда и при нормальном окончании) на печать вы- 
водятся текущие значения всех или выбранных групп перемен- 
НЫХ. 

(6) Трассировку выполнения инструкций программы. Про- 
граммист указывает границы или ключевые точки. Каждый раз, 
когда управление попадает в пределы установленных границ, 
создается «карта» прохождения, которая идентифицирует все 
инструкции, выполняющиеся внутри данной области. Часто ход 
выполнения программы представлен в виде номеров исполняе- 
мых инструкций или последовательности передач управления: 
«Выполнены — инструкции с номерами 1, 2, $, 4, 5, 6, 4, 5, 
6, 4, 5, 6, 7, 8» или «Выполнение началось с номера 1. Переход 
с бна 4. Переход с 6 на 4. Окончание на 8». Последняя форма 
предполагает последовательное выполнение инструкций с номе- 
рами 1, 2, 3,...; регистрируются только переходы (с 6 на 4). 

(в) Контроль за определением переменных. Переменные, 
которым еще не присвоены значения (инструкцией инициализа- 
ции данных РАТА, входными данными, инструкцией присваи- 
вания или каким-либо другим способом), называются «неопре- 
деленными». Каждая переменная связана со словом в памяти, а 
каждое слово содержит некоторое значение. Если программа не 
поместила в слово какое-либо определенное значение, то в нем 
содержится то, что было запомнено ранее, — часть другой про- 
граммы или какие-то «чужие» данные. Название «неопределенные» 
переменные в действительности означает, что значение перемен- 
ных «непредсказуемо» или «лишено смысла». Некоторые компи- 
ляторы при обработке ссылок на переменные следят за тем, что- 
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бы при каждом таком обращении значение переменной уже было 
определено. 

(г) Проверку на соответствие. Индексы массивов не должны 
выходить за пределы декларированных диапазонов. Фактические 
параметры должны быть того же типа и в том же количестве, 
что и формальные. Результаты арифметических вычислений не 
должны превышать размеров переменных, в которых они долж- 
ны храниться. В некоторых компиляторах подобные ситуации 
контролируются и в случае ошибок программа будет завершена 
аварийно. 


2. Пользуйтесь помощью компилятора. 

Не пренебрегайте средствами отладки компилятора и опе- 
рационной системы. Некоторые начинающие программисты счи- 
тают для себя зазорным использовать имеющиеся в компиляторе 
средства отладки. Часто их рассуждения основаны на том, что 
проверка индексов увеличивает время работы программы (что 
имеет место), но во время первоначальных отладочных прогонов 
это ложная экономия. Небольшие затраты машинного времени, 
конечно, стоят меньше, чем значительные потери времени про- 
граммиста и, возможно, еще большие потери времени у тех, 
кто ждет окончательной сдачи программы в работу. 

Другая причина, вследствие которой не используют вспомо- 
гательные отладочные средства, основана на убеждении: «Я 
узнаю больше, если не буду пользоваться готовыми отладочными 
средствами». Если задача проработана тщательно, то програм- 
мист хорошо представляет себе структуру программы и ход ее 
выполнения. Конечно, можно больше узнать из нового проекта, 
чем оставаясь в рамках старого. Поэтому, чтобы максимально 
повысить свою квалификацию и расширить кругозор, програм- 
мист должен поработать над многими задачами, что можно сде- 
лать только при минимизации времени на отладку уже готовых 
программ. Это не следует интерпретировать как рекомендацию 
плохо или неполностью проводить отладку, а скорее как аргу- 
мент, подкрепляющий замечание о необходимости полного ис- 
пользования всевозможных отладочных средств. 


3. Нужно предвидеть возможные ошибки. 

(а) При планировании программы определите места, где 
могут возникнуть ошибки. Мы уже рекомендовали проводить _ 
проверку входных данных, поскольку это одно из основных 
мест в программе, которые доставляют неприятности. Теперь 
мы советуем, чтобы аналогично вы производили проверки в 
местах возможных ошибок внутри программы. Например, при 
выполнении операции деления А на В необходимо проверить, 
не имеет ли В нулевого значения. Если ваш компилятор не про- 
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веряет принадлежности индексов соответствующим диапазонам, 
то прежде, чем использовать величину 3З*+[ОаКАРЕ-{ 1)/4-- 
1РЕО$, например, в качестве индекса, необходимо проверить, 
находится ли она внутри допустимых границ. 

(6) Выделите ключевые точки внутри программы. Всякий раз, 
когда программа входит в новую фазу, полезно знать, что она 
выполнила ‘одну группу инструкций и перешла к другой. Когда 
вы первый раз пишите программу, включите инструкции вывода 
в точки перехода от одной фазы к другой. В этом случае, если в 
программе произошла ошибка, вы будете иметь представление, в 
каком месте ее искать. 

(в) При написании программы включайте отладочные инструк- 
ции. Постепенно вы привыкнете делать это автоматически даже 
тогда, когда ваш мозг полностью сосредоточен на самой програм- 
ме. Например, в начале и в конце каждой подпрограммы следует 
автоматически ставить инструкции вывода. 

(г) Избегайте многократного вставления и выбрасывания 
отладочных инструкций. Если вы нашли подходящие места и 
расположили там полезные для отладки инструкции, то оставьте 
их там вплоть до самых последних этапов работы над програм- 
мой. Создается впечатление, что существует закон: когда вам 
кажется, что вы уже нашли и исправили последнюю ошибку, 
и вы удалили все фрагменты программы, помогавшие вам в от- 
Ладке, появляется еще одна ошибка. 

Вместо того чтобы удалять отладочные инструкции, можно 
просто их деактивировать. В качестве примера рассмотрим 
подпрограмму, вычисляющую темп обесценивания товара. Такая 
подпрограмма-функция может выглядеть следующим образом: 


ВЕЛГ. РОМСТЮМ РОЕСГМ (СО$Т, На, УЕАКМЮ) 


С ВЫЧИСЛЕНИЕ ТЕМПА ОБЕСЦЕНИВАНИ 
С ВХОДНЫЕ ДАННЫЕ: 
С СО5Т НОВАЯ СТОИМОСТЬ ТОВАРА | 
С МУБАВ$ КОЛИЧЕСТВО ЛЕТ, В ТЕЧЕНИЕ КОТОРЫХ ПАДАЛА СТОИ» 
С МОСТЬ ТОВАРА 
С УЕАВМО ГОД, ДЛЯ КОТОРОГО НУЖНО ВЫЧИСЛИТЬ СНИЖЕНИ 
с выход СТОИМОСТИ (НАПРИМЕР, УЕАКМО =! ОЗНАЧАЕТ ПЕРВЫЙ год) 
с ВОЕСЬМ РДУ ИНА СНИЖЕНИЯ СТОИМОСТИ В ЗАДАННОМ 
[МТЕСЕК МУЕБАКЮ$, УЕАКМО 
КЕАГ СОЗ$Т 
ГОС1САЕ. РЕВОС/.ТВОЕ./ 
ГМТЕСЕВ 1ОВООТ/б/ 
С ОТЛАДОЧНЫЙ ВЫВОД ДЛЯ ТРАССИРОВКИ ПРОГРАММЫ 
ТЕ(РЕВОС) \УНТЕ (ОВОЧТ, 100) СО$Т, МУЕАВ$, УЕАЮМО 
100 РОЮМАТ (’*** ОТЛАДКА ** ПРИ ВХОДЕ В ОРЕСЁЕМ 
Хх СО$Т=’,Е10.2, "’МУЕАВ$, УЕАЮКМО—/’,215’) 
... ВЫЧИСЛЕНИЯ 
С ОТЛАДОЧНЫЙ ВЫВОД Для ТРАССИРОВКИ ВЫХОДА ИЗ ПРО- 
С ГРАММЫ 
1Е(ОЕВИО@) \УЮТЕ(ТОВОЧТ, 101!) РРЕСЬМ 
101 ЕОЮМАТ (”** ОТЛАДКА** ПРИ о ИЗ РРЕСЬЁМ 
Хх ВОЗВРАЩАЕТСЯ ЗНАЧЕНИЕ’, 210.2 
КЕТОКМ 


ЕМО 
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Когда программист первый раз прогоняет  подпрограмму 
РРЕСЕМ, могут выявиться некоторые ошибки. Однако устано- 
вить место их возникновения не представляет труда, так как 
при каждом обращении к подпрограмме все входные и выходные 
величины выводятся на печать. Поэтому, если подпрограмма 
постоянно дает ошибочные результаты, подозрение падает на 
некоторую общую часть подпрограммы. В том же случае, если 
только один набор данных дает неверные результаты, вы распо- 
лагаете всеми значениями входных данных и можете проследить 
обработку этих значений в подпрограмме. 

Важно отметить, что инструкции отладки не следует удалять 
после того, как программный модуль заработал. Вместо этого 
замените перфокарту 


ГОСТСАГ, ОЕВОСЯ /.ТКИЕ./ 


на 
ГОС1ТСАГ, РЕВОС /.РАТЗЕ./ 


Это деактивирует отладочную печать. Однако, если в будущем 
понадобятся какие-либо изменения в модуле ОРЕСЁМ, посрел- 
ством одной перфокарты можно вновь изменить значение РЕВОС 
на .ГКОЕ. и активировать отладочные инструкции в указанном 
модуле. Спустя длительное время будет уже трудно вспомнить 
точки отладочной трассировки в программе, тогда как при разра- 
ботке алгоритма определить их место сравнительно легко. Далее 
не имеет смысла терять время для подготовки инструкций вы- 
вода только для того, чтобы, выкинув их, вновь переписывать те 
же самые инструкции при последующих отладках. Выбросить всю 
отладочную информацию — это ложная экономия. 

Можно обобщить этот метод. Один из возможных путей со- 
стоит в том, чтобы сделать РЕВОЯ параметром или глобальной 
переменной (с помощью СОММОМ, как показано в разд. 2.6). 
Логическая переменная будет затем активизировать инструкции 
отладки во всей программе. Изложенный метод предполагает 
ввод специальных данных для управления переключателями 
отладки. [Гоэтому вместо того, чтобы вновь компилировать 
исходную программу после изменения инструкции, инициали- 
зирующей переменную РЕВОС, вы можете включать или выклю- 
чать отладочные инструкции посредством специальных значений 
во входных данных. В этом случае, если при обработке одного 
набора входных данных происходят какие-либо ошибки, можно 
активировать отладку только для этого набора входных данных, 
тем самым ограничивая вывод на печать только критическими 
участками программы. 

Другой вариант этой схемы предполагает назначение «уровня 
доверия» для каждого участка отлаживаемой программы. Так, 
простая программа, связанная с выполнением элементарных вы- 
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числений, может иметь высокий уровень доверия, тогда как 
сложная подпрограмма, выполняюшая много запутанных вычис- 
лений, может иметь низкий уровень доверия. РЕВОС задают в 
этом случае в виде числовой переменной. При выполнении про- 
граммы, если значение РЕВОС не выше уровня доверия некото- 
рой программы или инструкции вывода, то отладочный вывод не 
происходит. Однако, если значение РЕВОЯ выше уровня доверия 
определенной секции программы, происходит отладочный вывод 
для этой секции. Локальные инструкции отладки могут быть за- 
даны в виде 


1Е (РЕВОС.СТ.4) \КТЕ(—,—) МАХУАЕ, СО$Т 


Процесс отладки начинается при высоком значении РЕВОС; 
при этом происходит вывод на печать из всех отладочных точек 
программы. Когда отладка программы продвинулась и вы доби- 
лись большего доверия в программных модулях, уменьшите зна- 
чение РЕВО@. Нулевое значение РЕВО@ будет указывать, 
что отладочная печать вообще не нужна. 

Один из наиболее часто выдвигаемых аргументов против того, 
чтобы оставлять в программе отладочные инструкции, заключа- 
ется в том, что они требуют дополнительных затрат времени, 
памяти, бумаги. Этот аргумент часто выдвигают опытные про- 
граммисты, ранее программировавшие на старых машинах. Ма- 
шины работали тогда медленнее и были меньше многих современ- 
ных ЭВМ. Для относительно сложных программ время проверки 
значения одной логической переменной или требуемая емкость 
памяти для конструкции вида [Е (— —) УВПИЕ (—, —) — — — 
незначительны. Следует, конечно, разумно подходить к исполь- 
зованию инструкций отладки, располагая их по возможности та- 
ким образом, чтобы они повторно не исполнялись. (Внутрь 
цикла ОО, например который будет повторен 1000 раз, не сле- 
дует вводить инструкцию отладки, если вам не требуется управ- 
лять каждой итерацией цикла. Вы можете, однако, использовать 
«выборочный» метод, выводя значения на 10, 20, 30-Й ит. д. 
итерациях.) Если выбирать между эффективным выполнением 
программы и легкой отладкой, то в производственных програм- 
мах, которые будут использованы многократно или с большими. 
объемами данных, предпочтение отдают обычно эффективности. 
Однако даже и в них следует по возможности оставлять отладоч- 
ные инструкции. Мы рассмотрим вопрос об эффективности про- 
граммы более детально в разд. 1.6. | 

(д) Легче отлаживать правильный алгоритм, чем неправиль- 
ный. Время, затрачиваемое на то, чтобы сделать алгоритм про- 
граммы еще до того, как она будет запрограммирована, правиль- 
ным, отшлифованным и проверенным, считается хорошо потра- 
ченным временем. Не стоит слишком беспокоиться о написании 
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программы. Гораздо легче переделать или даже вновь написать 
программу, чем заново переработать ее алгоритм. 

(е) Полезно объяснить детально алгоритм еще кому-нибудь. 
В процессе обсуждения вы сможете найти моменты, которыми 
ранее пренебрегли. С другой стороны, тот, кому вы объясняете 
алгоритм, может высказать мнение, что тот или иной сегмент 
«выглядит сомнительно». Часто от собеседника требуется быть 
просто слушателем; вы сами найдете ошибки, когда попытаетесь 
объяснить алгоритм. Многие коммерческие группы программи- 
рования используют прием, который называется — «прогулкой 
по программе» !. Для этого каждый член группы объясняет свои 
разработки остальным сотрудникам группы. Руководитель 
обычно не присутствует при таких обсуждениях, и поэтому 
члены группы не чувствуют себя как на суде. Обсуждающие 
вносят предложения, но чаще всего сама попытка объяснить 
логику программы помогает автору выявить потенциальные за- 
труднения. Ясно, что этим методом могут также пользоваться 
студенты, отлаживающие программы; все, что требуется, это 
другие студенты, которые согласились бы послушать. 


1.5.2. Как же все-таки производят отладку? 


Возможно, вас удивило, когда вы написали первые программы 
и отдали их более опытному программисту, что он смог быстро 
найти и исправить ваши ошибки. Опытный программист смог 
быстро найти ошибки потому, что хорошо знает язык, понимает, 
где могут возникнуть ошибки в ваших относительно простых 
первых программах. В своей практике он встречался со многими 
различного рода ошибками. С приобретением опыта в программи- 
ровании скорость, с которой вы будете производить отладку 
программы, также увеличится. Невозможно детализировать все 
шаги отладки конкретного задания или объяснить все возмож- 
ные методы отладки. Некоторые лучшие приемы отладки заклю- 
чаются в комбинировании, кажется, не связанных друг с другом 
моментов и формировании гипотез. И все же мы рассмотрим не- 
которые конкретные приемы отладки, применяемые опытными 
программистами. 

Сначала вы должны научиться понимать диагностические 
сообщения, выдаваемые компилятором. К сожалению, некоторые 
компиляторы выдают одно и то же туманное сообщение («5УМТАХ 
ЕВКОК», т. е. синтаксическая ошибка) для всех ошибочно за- 
писанных инструкций. В этом случае вы должны проверить син- 


1) Этот прием называют также структурным разбором (см. Э. Иодан). 
Структурное проектирование и конструирование программ.— М.: Мир, 1979) 
или структурным рецензированием.— Прим. ред. 
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таксис инструкции с помощью руководства по языку, обращая 
внимание на парность скобок, посмотреть, не пропущена ли 
запятая, нет ли ненужных знаков и т. д. 

Другие, более «развитые» компиляторы выдают детальные 
сообщения, основанные на предположении о том, какая инструк- 
ция должна быть на самом деле. Однако иногда такие компиля- 
торы могут ошибаться. Приведем классический пример из Форт- 
рана. В Фортране может быть только 2 случая, когда терм ариф- 
метического выражения может состоять из имени, после которого 
непосредственно следует левая скобка: при ссылке на массив или 
на функцию. Используя метод исключения, если компилятор не 
встретил декларации массива с этим именем, он заключает, что 
имя, за которым следует левая скобка, является обращением к 
функции. Если вы просто забыли объявить массив или допустили 
орфографическую ошибку в имени массива, компилятор выдает 
неправильные сообщения о том, что якобы имеют место ссылки на 
несуществующие функции. Только опыт помогает разобраться в 
таких случаях. Поэтому вам следует хорошо знать сообщения об 
ошибках. Всякий раз, когда вы встречаетесь с новыми сообще- 
ниями об ошибках или с новыми ситуациями, в которых происхо- 
дят сообщения об ошибках, следует взять на заметку такие об- 
стоятельства и сопутствующие им сообщения. Еще более гибкие и 
развитые компиляторы могут вносить исправления в программу. 
Приведем пример. Элементы в списке инструкций ЕОКМАТ 
должны быть разделены запятыми. В некоторых случаях, таких, 
как пропуск запятой после завершающей кавычки в цепочке 
литер, вполне очевидно, где должна стоять запятая. В случае 
ошибки вида | 


12 ЕОКМАТ (’АМЗ$='10Х, Аб) 


компилятор может не только указать, что нужно поставить 
запятую между 'А\5=’и 10Х, но и вставить ее, сообщив вам об 
исправлении, и продолжить компилирование «исправленной» 
программы. Разработчик компилятора, анализируя ситуации, 
в которых кавычка могла предшествовать цифре, установил, что 
в большинстве, скажем в 80%, случаев между кавычкой и циф- 
рой подразумевалась запятая. Это хорошо для большинства 
случаев, но что, если ваша конкретная ошибка попадает в кате- 
горию меньшинства. 

В этом случае такая «коррекция» может увести гораздо даль- 
ше от правильной инструкции, чем та, с которой вы начинали. 
Поэтому, если компилятор выдает, например, сообщение «про- 
пущена запятая» или исправляет инструкцию путем занесения 
запятой, еще раз проверьте синтаксис инструкции. Вы, а не 
компилятор написали исходную инструкцию и не компилятор, 
а вы знаете, что в данном случае подразумевается. 
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После того как вы справились с сообщениями об ошибках, 
выданных компилятором, и располагаете программой, которая 
правильно скомпилирована, вы подготовлены к тому, чтобы за- 
пустить программу на выполнение. К этому моменту у вас дол- 
жен быть один чистый листинг исходной программы, в который 
включены вся документация, описывающая программу, имена и 
назначение основных переменных, в программу должны быть 
«включены» все необходимые отладочные инструкции, вы должны 
далее получить распечатку используемых входных данных и 
только после этого можно начать выполнение программы. 

Для отладки программ не было найдено пока ничего лучше, 
чем «ручное» моделирование процесса выполнения программы. 
При моделировании «вручную» вы держите в руке карандаш и 
начинаете «играть роль машины»; вы записываете значения пере- 
менных и прослеживаете за ходом работы программы. При этом 
вы сравниваете каждое полученное при трассировке значение 
со значением, которое та или иная переменная должна иметь 
на соответствующем шаге алгоритма. 

При моделировании «вручную» вам может помочь трассировка 
хода выполнения программы, создаваемая или компилятором, 
или вашими собственными отладочными инструкциями. Если вы 
сами строите трассировку хода выполнения программы, потребу- 
ется большое число сообщений типа «это место пройдено». Такие 
простые сообщения делаются всякий раз после того, как вы- 
полнение программы переходит от одного шага алгоритма к дру- 
гому. Например: «СОРТИРОВКА ОКОНЧЕНА; НАЧАЛОСЬ 
ВЫЧИСЛЕНИЕ СРЕДНЕГО ЗНАЧЕНИЯ». (Требуется не- 
сколько лишних ударов по клавишам устройства набивки данных, 
чтобы сообщения стали гораздо более осмысленными, чем, на- 
пример, сообщения типа «ТОЧКА 1». Конечно, это с лихвой 
окупается во время отладки.) Вход в подпрограмму и выход 
из нее представляют собой две естественные точки для трасси- 
ровки программы, поскольку эти точки связаны, как правило, 
с переходными шагами алгоритма. 

Чтобы найти ошибку, часто достаточно построить схему 
последовательности прохождения алгоритма. Бывают, конечно, 
случаи, когда выдерживается правильный порядок выполнения 
инструкций в программе, но при этом получаются неверные ре- 
зультаты. Тогда необходимо более глубокое моделирование; 
вам придется проследить также за вычислением значений по 
ходу выполнения программы. 

Для всех переменных нужно произвести вычисления точно 
так же, как это должно происходить в программе. Если ошибка 
невелика, то все вычисления необходимо производить с полной 
точностью. (Не пренебрегайте также ошибками округления и 
усечения. Эти ошибки обсуждаются в гл. 6.) Если ошибка велика, 


1.5. Методы отладки 89 


то обычно достаточно лишь оценить значения на каждом шаге 
вычислений, запоминая моменты, когда оценка или слишком 
велика, или слишком мала и насколько существенно она расхо- 
дится с результатами счета. 

Во время этой фазы отладки используют распечатки значений, 
которые получаются по ходу вычислений. В этом случае распе- 
чатка подобна той, которая выдается при трассировке програм- 
мы, только вместо сообщений типа «это место пройдено» появля- 
ется «вычислено значение Х, оно равно — — — —». Ключевые 
точки при выполнении программы становятся также ключевыми 
точками для вычисляемых величин. Как и ранее, вывод при 
трассировке должен быть четко помечен, чтобы определить 1) 
местонахождение инструкций вывода в программе, 2) знать, 
какие переменные прослеживаются и 3) какие они имеют значе- 
НИЯ. 

Подходите разумно к выполнению этой фазы отладки. Часто 
нет необходимости просматривать значения всех элементов мас- 
сива. Например, если производится сортировка массива, доста- 
точно значений первых десяти элементов для того, чтобы убедить- 
ся, что сортировка работает. Если элементы последовательно 
добавляются к массиву, то можно удовлетвориться значениями 
последней полудюжины элементов. Выводите на печать столько 
сведений, сколько необходимо для наблюдения за выполнением 
программы, но не настолько много, чтобы утонуть в бесполезной 
информации. 

Другой метод отладки, который может быть очень полезным, 
состоит в прослеживании работы программы в обратном направ- 
лении. Предположим, что вы находитесь на 200-й инструкции и 
значение Х неверно. От этой точки вы просматриваете программу 
вверх и ищете место, где Х было присвоено это значение. Разу- 
меется, поиск не сводится к простому продвижению вверх по 
программе, поскольку инструкции СО ТО или [} могли изменить 
последовательность выполнения других инструкций. Если Х 
в некоторой точке присваивается значение У--7, то, возможно, 
или У, или Г имели ошибочные значения. Тогда придется просле- 
дить, как У и 1 получили свои значения. Таким образом стро- 
ится дерево, где каждый вариант, в котором Х может получить 
то или иное значение, представлен единственной ветвью. За- 
метим, что, если Х зависит от У и 1, одна из ветвей Х в этом 
дереве может расщепиться на подветви У и 7. Каждую из двух 
новых ветвей прослеживают в обратном направлении по отноше- 
нию к последовательности выполнения программы. Эти ветви 
затем удаляют одну за другой, так как 1) моделирование и вывод 
программы подтверждают, что вычисления в данной ветви и все 
ее входные данные правильны, или 2) моделирование и вывод 
программы подтверждают, что данная ветвь вообще не выполня- 
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лась. В оставшиеся ветви можно ввести дополнительные ин- 
струкции отладки, чтобы сузить поиск ошибочных вычислений, 
точно определяя, какая ветвь исполнялась и какие начальные и 
конечные значения имели все переменные на этой ветви. В конеч- 
ном счете этот метод приведет к точке возникновения ошибки. 
Лишь немногие компиляторы дают возможность выполнить про- 
цесс обратного прослеживания за ходом выполнения программы. 
Вероятно, труднее всего при отладке прийти к заключению, 
что ошибок больше чем одна. Следует проанализировать весь 
напечатанный материал и убедиться, что вы нашли столько 
ошибок, сколько можно выявить по имеющемуся выводу про- 
граммы. Многие программисты практикуют «итеративную отлад- 
ку», при которой они получают распечатку, находят одну ошиб- 
ку, исправляют ее, вновь выполняют программу, находят сле- 
дующую ошибку, исправляют ее, снова дают вывод на печать, 
находят следующую ошибку и т. д. Ваше время будет использо- 
вано более эффективно, если вы продолжите моделирование вруч- 
ную до тех пор, пока не проследите значительную часть програм- 
мы, несмотря на то, нашли ли вы одну или 100 ошибок. Если вы 
уже настроились на моделирование, то легче его продолжить, 
чем прервать, а затем вновь возвращаться к моделированию после 
следующего выполнения программы. Заманчиво исправить «пос- 
леднюю ошибку», но опытные программисты ясно понимают, что 
«последняя ошибка» часто оказывается далеко не последней. 


1.6. Эффективность 


Эффективными называют программы, которые используют 
минимальное количество ресурсов. Важно знать, что существует 
много различных видов ресурсов: машинное время и память — 
два важных ресурса, вспомогательная внешняя память (магнит- 
ные ленты и диски; см. гл. 4) и бумага также относятся к ресурсам 
ЭВМ. Два очень ценных ресурса, которым часто не придают 
значения, это время работы программиста и время пользователя. 
Когда мы используем термин «эффективность», необходимо тща- 
тельно определить, какие ресурсы экономятся и насколько эта 
экономия увеличивает расход других ресурсов. Относительная 
ценность указанных ресурсов существенно различна для различ- 
ных ЭВМ и различных людей. Важно, однако, поставить в соот- 
ветствие каждому ресурсу какую-то разумную стоимость. 


1.6.1. Эффективность в смысле машинного времени/памяти 


Эффективность в смысле машинного времени означает потреб- 
ление наименьшего количества времени для получения желае- 
мого результата. Ясно, что следует избегать ненужных вычисле- 
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ний. Ниже приведены классические случаи, очевидно, неэффек- 
тивных программных фрагментов. 

Один из наиболее серьезных видов неэффективности — это не- 
однократное повторение вычислений одних и тех же значений. 
Следует выносить постоянно повторяющиеся вычисления из 
цикла. Рассмотрим пример: 


00 10 1 
ВЕТ) 
10 СОМТТМУЕ 


1. М 
АСТИ С**ж2 = 4*0) 


Очевидно, что (С+*2—4*+0) не изменяется внутри цикла. Однако 
большинство компиляторов строят этот цикл в объектной про- 
грамме так, что при каждом проходе через цикл происходит 
вычисление (С++2—4»0). Наиболее простое решение — вынести 
инвариантные вычисления за пределы цикла: 


ОЕМОМ = (С%%2 - 4%0} 
00 10 Тт=1, М 
8(1) = А(1! / ОЕМОМ 
10 СОМТ1МУЕ 


Случаи, подобные рассмотренному, встречаются довольно часто. 

Второй очевидный источник неэффективности — одновремен- 
ное применение вещественных и целых чисел и переводы одних в 
другие. На многих ЭВМ вычисления с вещественными числами 
требуют значительно больше времени, чем с целыми; например, 
на малых ЭВМ выполнение арифметической операции с двумя 
вещественными числами требует обращения к подпрограмме. 
Преобразования из одного типа данных в другой также вызывают 
расход машинного времени. Поэтому всегда, когда есть выбор 
между вещественными и целыми числами, следует отдавать пред- 
почтение вычислениям с целыми числами. Аналогично следует 
избегать ненужных преобразований между типами. Там, где это 
возможно, надо стараться, чтобы выражения смешанного типа 
содержали только один член «инородного» типа, и его следует 
расположить в таком месте, чтобы с ним было связано по возмож- 
ности наименьшее количество преобразований. 

Третий очевидный фактор, влияющий на временные затраты, — 
способы индексации. Напомним из гл. 0, что формула доступа к 
индексированной переменной включает по одному дополнитель- 
ному члену на каждое лишнее измерение, и чем больше размер- 
ность, тем больше умножений приходится на каждый член. По 
этой причине ссылки на одномерные массивы предпочтительнее, 
чем на двумерные и т. п. Заметим, однако, что если индекс пред- 
ставляет собой сложное выражение типа (3+) -7=1—), то 
использовать его при ссылках, наверное, хуже, чем два простых 
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индекса ([, У). Очевидно, что к простым переменным обращаться 
намного легче, поэтому, где это возможно, их следует предпо- 
честь массивам. 

Однако несправедливо игнорировать в этом процессе роль 
компилятора. Сделанные выше замечания относятся к общеиз- 
вестным методам обеспечения эффективности. Точно так же, как 
программисты в течение длительного времени при написании 
программ учитывают изложенные соображения эффективности, 
так и разработчики компиляторов добиваются эффективности. 
Даже многие компиляторы прикладного характера обнаружи- 
вают сегодня отмеченные выше неэффективные конструкции и 
генерируют эффективные программы. Большинство источников 
неэффективности программ было связано с компиляцией ин- 
струкций Фортрана в объектный код. Возьмем, к примеру, 
повторяемые вычисления внутри цикла. Часто такие ситуации 
возникают в генерируемом компилятором коде для вычисления 
адресов элементов массива или для определения адресов вызова 
подпрограммы. Эти части кода программы не поддаются прямому 
управлению со стороны программиста, и поэтому компилятор 
должен сам оптимизировать такого вида ситуации. Многие ком- 
пиляторы. выносят за пределы цикла инвариантные вычисления 
вне- зависимости от того, программист ли оставил эти вычисления 
внутри цикла, или они возникли в процессе компиляции. 

‚Мы рекомендуем вам не пользоваться заведомо неэффектив- 
ными конструкциями. Однако не стоит и корпеть над инструкция- 
ми программы слишком долго ради микросекундного выигрыша; 
это не есть показатель квалификации программиста. В конечном 
итоге разница во времени выполнения между хорошо составлен- 
ной программой и наилучшей программой, реализующей тот же 
алгоритм, оказывается несущественной. Важнее то, что, когда 
программист прибегает к разного рода хитростям, стремясь во 
что бы то ни стало повысить эффективность выполнения, нагляд- 
ность текста программы часто ухудшается; на наш взгляд, это 
серьезное нарушение приоритета. Короче, мы рекомендуем, 
конечно, проявлять здоровую заботу об эффективности програм- 
мы, но не одержимость. 


1.6.2. Эффективность алгоритма 


Мы сделали довольно беглый обзор по вопросам эффективно- 
сти нижнего уровня, беспокоясь в первую очередь об оптималь- 
ном. программировании конкретных шагов алгоритма. Гораздо 
более существенной оказывается, однако, сложность самого ал- 
горитма. Давайте рассмотрим два примера — алгоритмы поиска. 
и сортировки. 
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Существует много методов поиска определенного значения в 
списке значений. Наиболее прямолинейный из них — метод 
последовательного перебора. Значение, которое вы ищите в 
списке, сравнивается с каждым элементом списка, начиная с 
первого элемента, до тех пор, пока значения не совпадут. Ясно, 
что в среднем потребуется просмотреть половину списка, чтобы 
найти нужный элемент. Если список состоит из М элементов, в 
среднем понадобится М№/2 сравнений. | 

Рассмотрим теперь время работы программы, реализующей 
этот алгоритм. Для списка из М элементов будет в среднем выпол- 
нено №/2 сравнений плюс №/2 приращений индекса цикла и про- 
верок (для выхода из цикла), плюс некоторое постоянное коли- 
чество других выполняемых инструкций. Таким образом, время 
выполнения данного алгоритма составляет с» (М№/2)-- а, где си 
4 — константы, зависящие от времени выполнения операций 
сложения или сравнения на конкретной ЭВМ. Ясно, что этот 
алгоритм выполняется со скоростью, пропорциональной М — 
количеству элементов массива. Говорят, что алгоритм имеет 
временную сложность М. | 

Однако это не самый эффективный метод поиска. При поиске 
нужного номера в телефонном справочнике мы не просматриваем 
подряд все номера. Более распространенный метод поиска заклю- ` 
чается в последовательном приближении: после каждой неудач- 
ной попытки мы продвигаемся вперед, если предположение дало 
слишком «маленький» результат, и назад, если слишком «боль- 
шой». Когда поиск подходит ближе к желаемому месту в книге 
или таблице, дистанция между последовательными попытками 
становится существенно меньше. Можно аппроксимировать этот 
подход посредством метода, известного под названием «бинарный 
поиск». В этом методе изначальная попытка происходит в сере- 
дине таблицы. Если искомое значение «меньше» или «больше» 
элемента из середины таблицы, то поиск продолжается в. первой 
или во второй половине таблицы соответственно. Следующая 
попытка относится к середине выбранной половины (т. е. 1/4 
или 3/4 таблицы). Затем мы продолжаем поиск в верхней или 
нижней части этих четвертей в зависимости от того, меньше или‘ 
больше искомое значение очередного пробного значения из таб- 
лицы. Процесс последовательного деления таблицы пополам 
продолжается до тех пор, пока или не будет найдено желаемое 
значение, или размер таблицы не уменьшится до нуля. 

Метод бинарного поиска иллюстрирует подпрограмма на 
рис. 1.2. 

Время выполнения бинарного поиска значительно меньше, 
чем простого последовательного поиска. Каждый раз, когда мы 
делим список, мы отбрасываем его половину. На первом шаге 
список уменьшается на половину предыдущего размера, на вто- 


‹Э 
‚р 


Гл. 1. Стиль программирования 


ЗИВКООТ1МЕ В1$ВСН (АКОа, ТАВГЕ, ТАВ$12, 1ОСМ) 
ПОДПРОГРАММА БИНАРНОГО ПОИСКА 


ПОИСК В ТАБЛИЦЕ “ТАВГЕ” ЗНАЧЕНИЯ “АКС” МЕТОДОМ БИНАРНОГО 
ПОИСКА. ПРОЦЕСС ПОСЛЕДОВАТЕЛЬНОГО ДЕЛЕНИЯ ПОПОЛАМ ТАБЛИЦЫ 
ПРОДОЛЖАЕТСЯ ДО ТЕХ ПОР, ПОКА НЕ БУДЕТ НАЙДЕН ИСКОМЫЙ 
ЭЛЕМЕНТ ИЛИ ПОКА НЕ БУДЕТ ИСЧЕРПАНА ТАБЛИЦА. 


ВХОДНЫЕ ПАРАМЕТРЫ; 

АКС ЗНАЧЕНИЕ, КОТОРОЕ ИЩЕТСЯ В ТАБЛИЦЕ 

ТАВЕЕ ТАБЛИЦА — СПИСОК, В КОТОРОЙ ИЩЕТСЯ’ ЗНАЧЕНИЕ АКС; 

ТАВ$12 РАЗМЕР ТАБЛИЦЫ; 

ВЫХОДНЫЕ ПАРАМЕТРЫ: 

БОСМ ЯЧЕЙКА, В КОТ ОРОЙ БЫЛ НАЙДЕН “АКС” ИЛИ О, ЕСЛИ “АБО” 
НЕ БЫЛ НАЙДЕН 


ВНУТРЕННИЕ ПЕРЕМЕННЫЕ: 
БО\М НАИМЕНЬШИЙ ИНДЕКС АКТИВНОЙ ЧАСТИ ТАБЛИЦЫ; 


обоявоовоововососоосоовоо 


Н] НАИБОЛЬШИЙ ИНДЕКС АКТИВНОЙ ЧАСТИ ТАБЛИЦЫ; 
мо СРЕДНЯЯ ТОЧКА АКТИВНОЙ ТАБЛИЦЫ; 

$12Е РАЗМЕР АКТИВНОЙ ТАБЛИЦЫ. 

ПРОГРАММИСТ: — — — ДАТА: — — — 


ТМТЕСЕР ААС, 10СМ, ТАВ$17, ТАВЬЕ(ТАВ5 12 
ТНТЕСЕВ 10» НГ» М10, $17Е 
ТАТЕСЕА ТОВОИТ 
ОСТСАК РЕВИС 
.  ФАТА ВЕВОбИ. ЕАЕЗЕ./,ТОВОИТИ6И 
/ ТЕ 0806) МА1ТЕ (10800Т,11) 
— 31 РОАМАТ (8 ЕМТАУ ТО В15АСН') 


со НАЧАЛЬНАЯ ПОПЫТКА НА ВСЕЙ ТАБЛИЦЕ ОТ1 ДО `ТАВЗТ2 
= 


За. НГ! = ТАВ$17+1 

$17Е х ТАВ$17 

сое НАЧАМЕ ЬОСМ? „НЕ НАЙДЕНО ИЗМЕНИМ, КОГДА „АВС“ БУДЕТ НАЙДЕН 
в) 


4% ОСНОВНОЙ ЦИКЛА ##% 


ТАБЛИЦА ИСЧЕРПАНА? 
28 ЗЕ 65 ПЕ «Е. 0) 60 ТО 150 | 
оо ЕЛИМ ТАБИИЦУ ПОПОЛАМ» ВЫЧИСЛЯЕМ СРЕДНЮЮ ТОЧКУ ‘ 
НТО = (Е0Н+НТ)/2 
12 (БЕВИС) НАТТЕ (15800Т,35) 104, НТ, АЙС, МТО, ТАВЕЕ( МТО) 
35 РОКНАТ {1 В15АСН ТООР: ТОН, НГ В04М0$=',2110, #$ СОМРАВТМб' , 110» 
Хх $ ТО ТАВЬЕ(!,16,') =',110) 
12 (АВС о 1Т., ТАВЕЕ(МТО))} НГ = М0 
ТР (АВС «СТ. ТАВЕЕ(МТО)} 104 = М1О 
1Е ААС «МЕ» ТАВЬЕ(МТО)) С0 ТО 25 


ИСКОМЫЙ ЭЛЕМЕНТ НАЙДЕН 
ЪОСМ = №0 


оо во 


ОБЩАЯ ТОЧКА ВОЗВРАТА 
150 18 {0Е80С1 НАТТЕ {10800Т,151) ААб, &0СН 
35} ыы {' ВТЗАСН ЕХ1ТЗ ААб=',110,', 1.0С№=! 1109 
ВЕТОК 


ЕМО 


Рис.1.2. Подпрограмма банарного поиска. (11: «вход в ВТЗКСН»; 35: «цикл 
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ром шаге — на одну четверть, на третьем шаге — еще на одну 
восьмую и т. д.; за К шагов список сокращается до 1/(2*=^) от 
первоначального ‘размера. Если размер списка равен М и если 
(2+) > М, то список исчерпан и работа окончена. Таким обра- 
зом, максимально возможное количество шагов поиска соответ- 
ствует такому наименышему значению А, что (2==К) > М. Это 
значение К равно 105,(№--1. Поэтому в наихудшем случае мы 
сделаем не более |о5.(М) сравнений до того, как список будет 
исчерпан. Временная сложность этого процесса не может быть 
хуже 1|0°, (М). При больших значениях М этот метод дает суще- 
ственное преимущество по сравнению с последовательным про- 
смотром. Однако метод бинарного поиска применим только к 
отсортированным таблицам, что существенно ограничивает сферу 
применения этого метода. 

В программе было проверено количество сравнений, необхо- 
димых для того, чтобы найти заданное значение в отсортирован- 
ной таблице из 100 элементов, каждый из которых имеет значение 
в диапазоне от | до 1000. Было выбрано в таблице 10 случайных 
элементов при использовании обоих методов — последователь- 
ного и бинарного поиска. Количество сравнений, необходимых 
для каждого из указанных методов, показано в табл. 1.1. 


Таблица 1.1. Сравнение бинарного и последовательного поиска 


КОЛИЧЕСТВО СРАВНЕНИЙ 
ИСКОМОЕ ЗНАЧЕ- ПОСЛЕДОВАТЕЛЬ- 


ТЕСТ № НИЕ НЫЙ БИНАРНЫЙ 
] 418 51 | 
2 946 95 6 
3 477 56 7 
4 3 ] 7 
5 725 74 6 
6 326 38 3 
7 432 53 7 
8 656 70 6 
9 51 5 6 
10 401 49 6 
В СРЕДНЕМ ° 49.20 5.50 


Таблица подтверждает установленную ранее статистику вре- 
менной сложности: 100/2 равно 50, а 105, (100) находится между 6 
и 7. Преимущество бинарного поиска еще более заметно, если 
размер таблицы растет; 1000/2 дает 500, в то время как 105, (1000)— 
менее 10. Различие между М№/2 и 105.(М№) увеличивается с ростом 
М. 

Давайте теперь проанализируем другой алгоритм — сорти- 
ровку. Под сортировкой мы подразумеваем расположение серии 
значений в таком порядке, когда каждое данное значение мень- 
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ше * последующего. Предположим, что у нас есть М элементов от 
А (1) по А(М). 

Классический «метод пузырька» включает сравнение последо- 
вательных пар чисел и обмен их местами, если числа расположе- 
ны не по порядку, т. е. когда большее число предшествует мень- 
шему. Эта процедура последовательно продолжается с массивом 
чисел, пока очередной проход не завершится без обмена. Алго- 
ритм этого процесса может быть представлен следующим обра- 
зом: 


М=МЬ—1. 

Если М < 2, останов. 

Переключатель=«выключен». 

. Выполнить для [=1 до М: 

если А(Г) и А(1--1) расположены не по порядку (А (Т) > 
>А ([--1)), то поменять их местами и установить переключа- 
тель в положение «включен». 

М=М—1. 

Если переключатель. выключен, то останов; в противном 
случае вернуться на шаг 2. 


нь (2 2 = 


© бл 


Определим временную сложность этого алгоритма. Цикл на 
шаге 4 включает наибольшее количество действий; поэтому мы 
вначале оценим, каково число повторений в цикле. Так как М 
на шаге 5 уменьшается на |, то число повторений инструкций, 
выполняемых на шаге 4, уменьшается на |1. Первый раз происхо- 
дит № — | сравнений, во второй раз М — 2 ит. д., и в последний 
раз — одно сравнение. Среднее число сравнений, выполняемых 
на шаге 4, равно М№/2. 

Хотелось бы узнать, сколько раз на шаге 6 переключатель бу- 
дет установлен в положении «включен». Переключатель находится 
в Положении «включен» только в случае, если два соседних эле- 
мента на шаге 4 поменялись местами. Заметим, что сразу после 
обмена мы переходим к следующему элементу. Поэтому за один 
проход меньший из сравниваемых элементов сдвигается только 
на одну позицию вверх. Однако наибольший элемент за один про- 
ход перемещается в конец списка. При втором проходе второй 
наибольший элемент занимает свое место. Поэтому достаточно 
(М—1) проходов для размещения всех элементов на свои места. 
Хотя количество проходов для сортировки зависит от начального 
распределения данных, в среднем требуется М№/2 проходов для 
сортировки М чисел. 


1) Мы будем говорить «меньше» только для простоты. Однако должно быть 
ясно, что те же методы применимы и в том случае, когда значения дублируются 
(тогда «меньше или равно» было бы точнее) или когда сортировку следует вы- 
полнять в порядке уменьшения значений (здесь правильнее сказать «больше 
чем»). 
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Так как шаг 4 включает в среднем №/2 сравнений на проход. 
и в среднем выполняется №/2 проходов, то количество сравнений, 
необходимых для проведения всей сортировки, пропорционально 
№2. Поэтому говорят, что данный алгоритм порядка М№#*=2. 
Это значит, что если мы увеличиваем размер сортируемого мас- 
сива в 10 раз, то следует ожидать увеличения времени выполне- 
ния сортировки в 100, или 10+*2, раз. Поэтому нужно дважды 
подумать, прежде чем использовать этот алгоритм для сортиров-. 
ки 1000 чисел, так как в этом случае понадобилось бы в среднем 
миллион сравнений. | 

Ни один из кратко рассмотренных выше методов повышения 
эффективности, никакие хитрости или тщательное кодирование 
программы не улучшают этой ситуации, так как это неотъемлемое 
свойство алгоритма №2. Сложность №2 характеризует сам 
алгоритм, а не способ кодирования этого алгоритма. Если мы хо- 
тим решить проблему сортировки эффективнее, необходимо ис- 
кать более быстрые алгоритмы, а не заниматься различными мето- 
дами программирования заведомо медленного алгоритма: . 

Лучшим алгоритмом является алгоритм быстрой сортировки 
по Хоору. В этой сортировке не происходит обмена местами 
между соседними элементами, так как в этом и заключается при- 
чина неэффективности метода «пузырька». Здесь устанавливается 
точка «деления» так, чтобы все элементы по одну сторону от 
элемента, находящегося в точке деления, были меньше этого 
элемента, а все элементы по другую сторону — больше его. 
(Заметим, что элементы на любой стороне могут не быть распо- 
ложены в правильном возрастающем порядке; однако все эле- 
менты слева будут меньше, а все элементы справа — больше раз- 
делительного элемента.) Это приводит к образованию лвух снис- 
ков, По одному с каждой стороны от точки деления. Пслученные 
два списка можно сортировать независимо, так как все элементы 
одного списка будут больше элементов другого списка. Кроме 
того, каждый из образованных списков будет меньше начального 
списка. 

Выберем один из крайних элементов в качестве первого разде- 
лительного элемента; предположим, что мы сделали левый эле- 
мент разделительным. Сортировку начнем с правого конца спис- 
ка, сравнивая все элементы по отношению к разделительному и 
оставляя на месте те элементы, которые больше разделитель- 
ного. Мы пытаемся определить место точки деления списка, и, 
если анализируемые элементы больше разделительного элемента, 
они будут оставаться справа от него. Однако, когда будет най- 
ден элемент, который меньше разделительного, он должен быть 
перенесен по другую сторону списка. Проделаем это, поменяв 
местами разделительный и найденный меньший элемент. Теперь 
продолжим тот же самый процесс слева направо, т. е. будем остав- 
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лять на месте элементы, если они меньше разделительного. 
Когда будет найден больший элемент, мы поменяем его местами с 
разделительным элементом. Заметим, что всякий раз, когда мы 
меняем местами элементы, меньший элемент перемещается влево 
от разделительного или больший элемент перемещается вправо. 
Продолжаем этот процесс до тех пор, пока все элементы не рас- 
пределим на два списка: элементы меньше разделительного 
элемента и элементы, большие его. 

Вначале проиллюстрируем метод примером. Используем два 
указателя Г, и В (левый и правый) для пометки текущего срав- 
ниваемого элемента с разделительным. 


ЕЙ 45 32 62 22 18 75 57 
т х <- К 
2, 18 32 62 22 45 75 : 
т -> х К 
3. 18 32 45 22 62 75 57 
т х < К 
% 38 32 22 45 62 75 57 
> в 
5. 48 32 22 _ 45 62 75 57 
Пу 


На первом шаге этого процесса элемент (57), идентифициро- 
ванный правым (К) указателем, сравнивается с элементом (45), 
помеченным левым (Ё.) указателем. Пока левый элемент меньше 
правого элемента, мы перемещаем правый указатель влево. Одна- 
ко, когда левый элемент оказывается больше правого элемента, 
меняем их местами (18 и 45 в строке 2). Затем начинаем двигать 
левый указатель до тех пор, пока правый элемент (45) не окажется 
меньше левого элемента (62), и вновь меняем элементы местами 
(строка 3). Продолжаем процесс перемещения правого и левого 
указателя и обмен элементов местами до тех пор, пока указа- 
тели не встретятся. Элемент, на котором встретились указатели, 
и будет разделительным элементом (ПУ). 

Затем повторим весь этот процесс применительно к каждому 
из двух списков по обе стороны от точки деления. Если каждый 
из двух списков содержит нули или единицы, то список уже от- 
сортирован. Условие окончания соблюдается только тогда, когда 
все списки отсортированы. Алгоритм быстрой сортировки приве- 
ден на рис. 1.3. 

Полный анализ времени выполнения алгоритма быстрой сор- 
тировки не входит в рассмотрение данной книги. Кнут устано- 
вил, что количество сравнений, требуемых для этого алгоритма, 


1.6. Эффективность 99 


пропорционально №105, (М), где М — размер  сортируемого 
массива. Чтобы убедить вас в какой-то степени, что эта оценка 
верна, выясним, чему равно количество сравнений, выполняемых 
в лучшем случае. Вначале мы начнем работу с одним списком раз- 
мера М. Этот список разделится на два списка, в лучшем случае 


| Сортировка массива А размера М в порядке возрастания 
1. М5$Т-ТО-ЗОВТ = (1,№) 
2. ОО 5УТЕР$ 3—7 УНШЕ 1.1$Т-ТО-$ЗОВТ не пустой 


3. Изымаем последнюю пару из стека [Ш$5Т-ТО-ЗОКТ. Пусть ГЕМО — 
первый, а КЕМО — второй элемент этой пары. 


ГРТ =ГЕМО; КРТ =КЕЮО 
4. ОО $УТЕР$ 5—6 \УНТШЕ ГРТ < КРТ 


о. +*ж Вначале перемещаем левый указатель, насколько возможно +* 
ро \УНШЕ (ЕП = А(КРТ) 
ГРТ =ГРТ-Е1 
ТЕ(ЁРТ = КРТ) ОО ТО 5ТЕР 7 
ЕМО 
*#+ Найден элемент, расположенный не по порядку ** 
ж+ Пересылаем левый элемент в правую часть %* 
Меняем местами А(ЁСРТ) и А(КРТ) 
6. ++ Теперь перемещаем правый указатель, насколько возможно +* 
ро \НШЕ (А(ЕРТ)) < А(ВРТ)) 
КРТ =КРТ— 1 
ТЕ(СРТ = ВРТ) СО ТО $ТЕР 7 
ЕМО 
++ КРТ элемент переходит на другую сторону жж 
Меняем местами А(ГРТ) н А(ВРТ) 
7. ** КРТ — точка деления %% 
ж* Делим список на два и сортируем каждый независимо №% 


*# Избегаем сортировки пустых списков 

ТЕ(ВРТ— 1 > ЕЕМО) поместить (.ЕМО, ВЕРТ— 1) в Ш$Т-ТО- Зов 
1Е(ВРТ-- 1 < КЕМО) поместить (КРТ - 1, КЕЮО) в [15ТО-ТО-5ОКТ 
ЕМО 


Рис.1.3. Алгоритм быстрой сортировки. 


размер каждого из которых равен М№/2. (Так как начальный 
крайний правый элемент становится точкой деления, точный 
размер каждого нового списка зависит от того, насколько хорошо 
был сбалансирован список по отношению к этой точке деления.) 
‚Каждый из двух новых списков делится на два списка, что дает 
4 списка размерами М№/4, которые в свою очередь дадут 8 списков 
размерами №/8 ит. д. В лучшем случае этот процесс оканчивается 
2+»хе списками размером М№/(2*«^) для наибольшего значения К, 
при котором (2**^) < М. Данное значение 2 точно равно 105. (М). 
Процесс деления на два всех подсписков должен быть выполнен 
105. (№) раз. Заметим, что деление списка требует анализа всех 
элементов списка и что общее количество элементов всех списков 
равно примерно М (за вычетом точек деления). Поэтому каждый 
из указанных 105, (№) проходов включает примерно М сравнений. 


4* 
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Следовательно, количество сравнений, выполняемых алгорит- 
мом быстрой сортировки, не может быть меньше №105, (№. 
Для всех М значение [о5,(№ меньше, чем М, и, когда М 
растет, 105.(М№) также растет, но намного медленнее. Например, 
105.(10) равен примерно 3, а 105,(1000) несколько меньше 10. 
Поэтому 1000 000 сравнений, необходимых для сортировки 
1000 элементов по методу «пузырька», можно снизить до 10 000 
сравнений при использовании метода быстрой сортировки. По- 
нятно, что метод быстрой сортировки дает существенную эко- 
номию. Совершенно очевидны преимущества выбора хорошего 
алгоритма и реализации его простым и наглядным образом. 


1.7. Изменяемость программы 


Практически все «производственные» программы требуют тех 
или иных модификаций. Это может быть вызвано изменением 
формы номеров служащих, например с 12345 на 12-345, или изме- 
нением формата отчетов. В других случаях требуется более зна- 
чительная модификация, как, например, добавление к програм- 
ме новых возможностей, выполнение дополнительных вычисле- 
ний или изменение выполняемых действий при вводе каких-то 
специальных данных. Структура программы может оказывать 
существенное влияние на то, легко или трудно реализовать эти 
изменения в программе. Здесь даны некоторые рекомендации, 
которые облегчают внесение изменений и программы. 


(а) Детально документируйте программы. Программист, вно- 
сящий изменения в программу, должен знать не только, где 
выполняется определенная функция, но также среду, в которой 
она работает. 

Например, если необходимо выйти из цикла ОО и вы намере- 
ваетесь позднее использовать значение индекса Л, то програм- 
мист, модифицирующий вашу программу, должен быть преду- 
прежден о том, что нельзя модифицировать значение У. Наиболее 
подходящий путь для выполнения этого условия — расположить 
инструкции, зависящие от Л, непосредственно в конце цикла. 
Если это невозможно, следует поместить комментарий в конце 
цикла, предупреждающий, что значение /] не должно изменяться. 

Мы уже установили, что каждой подпрограмме и каждой до- 
статочно крупной секции программы должен предшествовать 
список наиболее важных переменных. Этот список необходим, 
в частности, для того, чтобы подпрограмму было впоследствии 
легко изменять. 


(6) Не используйте хитрых конструкций.. Мы предупрежда- 
ли, что с точки зрения эффективности применение хитрых, или 
или «заумных», программ на практике дает сомнительную эконо- 
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мию. С точки зрения изменяемости программы практика приме- 
нения «заумных» приемов программирования вообще вредна. 


(в) Структура программы должна быть модульной. Это озна- 
чает, что программу следует аккуратно разделить на отдельные 
модули, а входы и выходы каждого модуля следует четко опи- 
сать. Тогда пользователь, которому понадобилось модифици- 
ровать программу, сможет быстро найти соответствующие сек- 
ции, в которые необходимо внести изменения, или произвести 
расширения, согласуя их с существующими участками програм- 
Мы. 


(г) Пишите таблично-управляемые программы. Предположим, 
что вы пишите редактор текста, т. е. программу, которая вводит 
строки текста и выводит ту же самую информацию в формате 
«печатной страницы». Программа может полностью заполнять 
строки (т. е. сливать текст из различных входных строк, печатая 
столько слов, сколько может поместиться в каждой выводной 
строке) или не полностью; выравнивать текст справа (вставлять 
дополнительные пробелы, чтобы все выводные строки были 
одной И той же длины, подобно строкам этой книги) или не вы- 
равнивать; печатать в каждой строке или через строку; пропу- 
скать п строк и т. п. Для управления этой программой вы можете 
разрешить пользователям добавлять команды редактирования, 
которые либо будут выравнивать текст справа, либо нет; будут 
пропускать п ‚строк, определять длину входной или выводной 
строки и т. д. | 

Пусть эти команды будут вставляться на строках, содержа- 
щих точки с двумя последующими буквами, характеризующими. 
команду. | 

Ниже приведен список таких строк: 


‚М ВЫРАВНЯТЬ ВПРАВО 

„МХ НЕ ВЫРАВНИВАТЬ ВПРАВО 

55 ПЕЧАТЬ В КАЖДОЙ СТРОКЕ 

‚2$ ПЕЧАТЬ ЧЕРЕЗ СТРОКУ 

„З3Р М ПРОПУСК М№ ПУСТЫХ СТРОК 

„ОГ, М СОЗДАНИЕ ВЫВОДНЫХ СТРОК ДЛИНОЙ М 

‚П, М ПЕРВЫХ ЛИТЕР ИЗ КАЖДОЙ ВХОДНОЙ СТРОКИ 


Одни действия должны выполняться для всех команд редак- 
тирования, другие — только тогда, когда присутствуют какие-то 
отдельные ‘команды редактирования. При использовании ко- 
манд, влияющих на формат вывода, вы хотите, например, печа- 
тать текущую выводную строку в старом формате, чтобы эта ко- 
манда оперировала лишь с последующими выводными строками. 
Проиллюстрируем сказанное на примере такой таблицы: 
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КОМАНДЫ ПЕЧАТАТЬ ЛИ ТЕКУЩУЮ ТРЕБУЕТ ЛИ ПОДРАЗУ- 
ВЫВОДНУЮ СТРОКУ? КОМАНДА  МЕВАЕМОЕ 
ЧИСЛА № ЗНАЧЕНИЕ М 


Аб) ДА НЕТ — 
М ДА НЕТ — 
55 ДА НЕТ — 
05 ДА НЕТ — 
оР ДА ДА 1 

ОГ, ДА ДА 80 
п. НЕТ ДА 72 


Эта таблица может быть естественно представлена серией масси- 
вов, один из которых содержит команды, второй | и 0 (или 
ТВОЕ. и .РАГЗЕ.), что означает «ДА» или «НЕТ», и последний 
массив — значение М (в гл. 3 мы расскажем о представлении 
литерных данных в Фортране). Назовем эти массивы соответ- 


ПОИСК КОМАНДЫ РЕДАКТИРОВАНИЯ ТЕКСТА 


99а . 
*° ПУСТЬ КОМАНДА БЫЛА НАЙДЕНА В СОМАНО(К) 


ПРОВЕРИМ, ДОЛЖНА ЛИ НАЧАТЬСЯ НОВАЯ СТРОКА 
ТЕ (РАСТМ(КТ +ЕЯ» 1} САБ. РАТМТССТМЕ, СТМЬЕМЯ 
ПРОВЕРИМ. ЕСТЬ ЛИ ЗДЕСЬ ЧИСЛО 
ТЕ (МОМВЕВ(К? „ЕЦ. 0) 60 ТО 2 
САБ бСЕТМУМ К 
ТЕ („МОТ,РОУМО) М = ОЕРЬТСК} 


ТЕПЕРЬ ОБЩИЕ ДЕЙСТВИЯ ПРОДЕЛАНЫ у 
ЗАЙМЕМСЯ КАЖДОЙ КОМАНДОЙ ОТДЕЛЬНО 
2 60 ТО (10,15,20,25,30,40,50} К 
44 № $$ 0$ ЭР 0 1 


®./Ц - НАЧАТЬ ВЫРАВНИВАНИЕ СПРАВА 
10 АБ5М = „ТВУЕ. 
60 ТО 100 


. М. = ПРЕКРАТИТЬ ВЫРАВНИВАНИЕ 
15 А04$мМ = „РАБЗЕ 
60 ТО 300 


‚5Р М - ПРОПУСТИТЬ М СТРОК 
30 00 35 Г = 1,м 
САБЕ РАМТ (ВЬАМК$ 11 
35 СОМТТМОЕ 
60 Тб 109 


© 


з пос 


$0 оо ооо 


оо 


С ОБРАБОТКА ЗАКОНЧЕНА? ВВЕСТИ НОВУЮ КАРТУ 
100 САЁЕ СЕТСАО 
ВЕТУКМ 
ЕМО 


Рис.1.4. Программа, управляемая таблицей. 
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ственно СОМАМО, РЕММЕ, МОМВЕК и РЕЕРГТ. Продемонст- 
рируем на рис. 1.4 фрагмент программы, который управляет 
выводом в соответствии с добавляемыми командами редактиро- 
вания. 

Заметим, что обработка каждой отдельной команды довольно 
короткая, так как мы уже выполнили все общие действия. Чтобы 
добавить новую команду, нужно просто сделать новую строку в 
таблице. (расширяя массивы) и придумать свой код для этой но- 
вой команды редактирования. Аккуратное заполнение всех мас- 
сивов не позволит вам забыть о каких-либо необходимых дей- 
ствиях, связанных с новой командой. Такой стиль программиро- 
вания называют «таблично-управляемым», так как элементы 
таблицы управляют работой алгоритма. 

Основное преимущество таблично-управляемых программ со- 
стоит в том, что такие программы легко модифицировать. Кроме 
того, благодаря простой реализации зачастую довольно сложного 
набора решений программу очень легко читать. Вследствие того 
что структура программы относительно проста, уменьшается 
вероятность ошибок, и поэтому программу легко отлаживать. 
В следующем разделе мы увидим, как можно сделать таблично- 
управляемые программы более наглядными. 


1.8. Разделяемые ячейки памяти: инструкция 
ЕСШУАТЕМСЕ 


Инструкция ЕОЛУАГЕМСЕ позволяет двум или более пере- 
менным разделять одну и ту же ячейку памяти. Конечно, так 
как одна ячейка памяти в данный момент может содержать только 
одно значение, инструкция ЕФОТУАГЕМСЕ в действительности 
определяет синонимы, т. е. различные имена, посредством кото- 
рых осуществляется доступ к одной ячейке памяти. Инструкция 
ЕОЧ1УАГЕМСЕ имеет следующую форму записи: 
ЕОШУАГЕКМСЕ (имена 1) [, (имена 2), и т. д.1 

где каждый список имена должен содержать перечисление про- 
стых переменных и элементов массивов с постоянными 
индексами. 

Пример: 


ЕООТУАТЕМСЕ (кбит, Тент 
КОЦМТ = 10 - 
ТСООМТ = ТСОИМТ + 1 

МАТТЕ (-,-) КОИМ 


Действие: Декларируется, что КОЦМТ и ПМСОЧМТ ссылаются 
на одну и ту же ячейку памяти. Значение, пе- 
чатаемое инструкцией \/КТТЕ, будет равно 11; 
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так как КООМТ и ПМСОЧМТ эквивалентны, 
третья инструкция имеет то же действие, что и 


КОПМТ=кКоомМТ - 1 


Замечание: Инструкция ЕЮПУАГЕМСЕ неисполняемая и дол- 
жна располагаться в программном модуле после 
всех специфицирующих инструкций, но до первой 
исполняемой инструкции. 


При использовании инструкции ЕФОТУАГЕМСЕ необходимо 
соблюдать два условия. Во-первых, напомним, что «целые» и «ве- 
щественные числа» означают лишь тот или иной способ интерпре- 
тации битовых цепочек, и на большинстве ЭВМ двоичное пред- 
ставление целого числа существенно отличается от двоичного 
представления того же вещественного числа. Например, следую- 
щий сегмент программы выглядит аналогичным приведенному 
выше примеру. 


ВЕАС СОУМТ 

ТМТЕСЕВ КООМТ 

ЕЧИТУАЕЕМСЕ (СОУМТ, КОУМТ} 
КООМТ =. 10 

СОИМТ = СбОМТ + 1.0 

ЧАТТЕ (-,-} КОИМТ 


Полученный ответ будет различен для различных компиля- 
торов, но он будет, почти наверняка, не равен 11! На 1ВМ 360, 
например, результат равен 1091567616. В гл. 6 мы рассмотрим 
внутреннее представление данных, и тогда вы сможете понять, 
почему получается такой странный ответ. В связи с тем что це- 
лые и вещественные представления редко совпадают, следует 
соблюдать осторожность, делая эквивалентными переменные 
различного типа. | 

Второе предостережение, касающееся использования инструк- 
ции Е,ФОТУАГЕМСЕ: следует помнить, что массив представ- 
ляется рядом смежных ячеек памяти. Поэтому эквивалентность 
между некоторыми элементами двух массивов предполагает 
также эквивалентность между остальными элементами этих 
массивов. Чтобы понять, что это значит, рассмотрим массивы 
А иВ размерами 10 и 6 соответственно. Положим, что в програм- 
ме встретились инструкции 


ВЕАГ А(10), В (6) 
ЕОТПУАГЕМСЕ (А (3), В(1)) 


Нам известно, что А (4) непосредственно следует в памяти за 
А (3) и что В (2) следует за В (1). Более того, В(Т) и А(3) ссыла- 
ются на одну и ту же ячейку памяти; назовем эту ячейку Х. 
_Ячейка памяти, непосредственно следующая за Х, принадле- 
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жит А(4), так как А(4) непосредственно следует за А(3). Ячейка, 
расположенная после Х, также принадлежит В (2), так как В (2) 
непосредственно следует за В (1). Поэтому А (4) и В (2) ссылаются 
на одну и ту же ячейку, расположенную непосредственно за Х. 
Отсюда эквивалентность между А (3) и В(1) приводит автома- 
тически к эквивалентности между А (4) и В (2), А(5) и В (3) и 
т. д. Представим эти отношения эквивалентности в наглядной 


форме: 


Го Гл же же = Г [же [я же 
Гек во [= [в [ 9 


Можно сделать эквивалентными более двух массивов, но 
новый массив не должен «растягивать» или «сжимать» другие 
массивы, т. е. не должно нарушаться подразумеваемое выравни- 
вание элементов массивов, между которыми уже установлена 
эквивалентность. Например, следующая запись недопустима: 


КЕАГ, А(10), В (6), С(4) 
ЕОЛУАГЕМСЕ (А (3), В (1), (С(1)), (С (4), В (1) 


Приведенная запись нелогична, так как она требует, чтобы эле- 
мент В (1) находился одновременно в двух местах: в А (3) и А (4). | 
Инструкция ЕСФОТУАГЕМСЕ, включающая С, неправильно 
определяет место В. 

В инструкции ЕФОТУАГЕМСЕ можно ссылаться на элемент 
многомерного массива с помощью одиночного индекса (константы). 
Этот индекс идентифицирует номер элемента относительно пер- 
вого элемента массива в соответствии с принятым в Фортране 
методом хранения массивов по столбцам. Предположим, что 
имеется массив А размером 20 на 25 и вы хотели бы сделать эк- 
вивалентными первые 100 элементов этого массива массиву В 
размером 100, а последние 400 элементов массива А сделать эк- 
вивалентными массиву С размером 400. Следующая инструкция 
дает правильное решение этой задачи, здесь не нужно думать о 
том, какой элемент массива А является 101-м. 


ЕОЧ1УАТЕМСЕ (А (1), В (1)), (А (100, С) 


Может показаться, что инструкция эквивалентности имеет 
сравнительно ограниченное применение, поскольку на первый 
взгляд нет необходимости ссылаться к одной и той же величине 
посредством разных имен. Однако существует несколько доволь- 
но важных применений инструкции ЕООТУАГЕКХСЕ. 

Первый пример наиболее простой. Два программиста, рабо- 
тая над большой программой, планируют объединить свои раз- 
дельные модули. Они находят, однако, что для обозначения одной 
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и той же переменной один из них использовал имя (У, а второй— 
имя ОТУ. Посредством эквивалентности это различие может 
быть легко устранено. (Однако это не способствует удобству 
чтения программы, в которой ссылка к одному и тому же значе- 
нию происходит по двум совершенно различным именам. Подоб- 
ный выход из положения называют «заплаткой» в противопо- 
ложность «решению». Конечно, два программиста, работающие 
над одной и той же задачей, редко допускают такие промахи.) 

Второе применение. Эквивалентность может сэкономить па- 
мять, позволяя использовать одну и ту же область памяти в 
двух независимых целях. Приведем пример. Для определения 
того, к какому семейству животных принадлежит неизвестный 
вид, ученые используют следующий метод. Во-первых, они уста- 
навливают размеры представителей этого вида. Измерения могут 
включать длину, вес, размах крыла, количество ног, наличие 
щупалькев и т. п. Затем они отбрасывают редкие максимальные и 
минимальные значения каждого измерения как отклонения от 
нормы и подсчитывают среднее от оставшихся значений. Так 
вырабатывается портрет (прототип) «типичного», или «среднего», 
представителя вида. Наконец, ученые сравнивают этот портрет с 
портретами известных видов и решают, какой из известных видов 
ближе всего к неизвестному. 

В программе, реализующей эту методику, необходимо иметь 
две большие области данных: первую — для хранения размеров 
всех представителей нового вида и вторую — для запоминания 
характерных размеров всех известных видов. Однако эти области 
используются независимо; когда определение средних характе- 
ристик (для неизвестного вида) завершено, область памяти, 
содержащая результаты отдельных измерений, больше не нужна. 
Эта область может быть общей с областью, предназначенной для 
хранения прототипов известных видов. Это взаимно исключаю- 
щее разделение памяти может быть выполнено инструкцией 
ЕООТУАГЕМСЕ, пример которой показан ниже: 

МТЕСЕКВ $АМРГЗ (100, 10), РВОЕП. (100, 50) 

ЕОУАГЕМСЕ (бАМРГ5, РКОЕП.) 

Третье применение эквивалентности — обеспечить описатель- 
ные имена для частей массива. Например, при написании про- 
граммы усреднения очков, набранных студентами, и вычисления 
отметок необходимо знать отсекающие значения — наименьшее 
количество очков для отметок А, В, Си В. Для удобства поме- 
стим эти значения в массив СОТОЕЕ размером 47. Однако если в 


Смысл этого примера трудно понять, не зная английского языка. До- 
пустив, что в Фортране разрешены имена, использующие русский алфавит, 
переведем эти две инструкции так: 


Е (НАБР-ОЧКИ. СЕ. ПРОХ-БАЛЛ) — 
]Е (НАБР-ОЧКИ. СЕ. ОТСЕК (4)) — — Прим. ред. 


1.8. Разделяемые ячейки памяти 107 


некоторой точке программы необходимо подсчитать количество 
студентов, получивших проходные отметки, то инструкция вида 


1Е (СОВЕ .ОЕ. РАЗ$$) — — 

дает читателю программы больше информации, чем 
ТЕ ($СОВЕ .ОЕ. СИТОЕЕ(4))— — 

Инструкция ЕЮТУАГЕМСЕ вида 
ЕОЧУАГЕМСЕ (РАЗ$$, СОТОЕЕ (4)) 


разрешит эту проблему. 

Следующее применение эквивалентности — если, например, 
мы имеем дело со значительным количеством простых перемен- 
ных, которые необходимо занулять несколько раз во время выпол- 
нения программы, можно каждую из этих переменных сделать 
эквивалентной с каким-то элементом массива и очищать весь 
массив в цикле РО. Следующий пример иллюстрирует, как это 
можно сделать: 


‚. ВЕКЬ СОУМТ, ЗУМ , АУб, ЗТОЕУ, 2ЕВО$ (4) 
ЕСОТУАЦЕМСЕ (2Е50$(1),СОУМТ), 52Е80$(2},5М), 420$ (3),А\Уб), 
Х 4{2Е80544),5ТОЕУ) 


Инструкции эквивалентности применяют и в случае исполь- 
зования многочисленных имен для обращения к различным ча- 
стям массива. В рассмотренной выше таблично-управляемой 
программе работа выполнялась с четырьмя различными масси- 
вами. В некоторых случаях удобно работать с одним массивом из 
четырех столбцов и иметь возможность обращаться к столбцам 
по индивидуальным именам. Так как массивы в Фортране хра- 
нятся в памяти по столбцам, можно установить эквивалентность 
между вектором и столбцом массива. Для примера таблично- 
управляемой программы можно написать 


— ТМТЕСЕЙ СОМТАВ( 7,4), СОММОСТ) ,РАСТМЕСТ) ›, МИМВЕВ (7) „ОЕРЕСТ (ТЯ 
ЕСИТУАЕЕМСЕ «(СОНТАВ(1,1),СОММО), (СОМТАВ( 1,2) ЭРАБТМЕ? » 
Х —(СОМАВ(1,3) МУМВЕВ), «СОМТАВ( 1,4} ОЕРЕТ) | 


с шв 

Таким образом, можно использовать СОМТАВ, как будто мы ра- 
ботаем с каким-то двумерным массивом, чтобы, например, ини- 
циализировать данные или изменить значения целой строки. 
Можно также обращаться к элементам СОМТАВ с помощью 
более удобных для чтения имен СОММО или ОЕРЕТ. 

Инструкция ЕООПУАГЕМСЕ очень мощная, возможно, даже 
слишком мощная для некоторых программистов. Они считают 
эту инструкцию очень «остроумной», поскольку она позволяет 
изменить значения переменных даже без обращения к ним по 
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имени; иногда программисты получают удовольствие, применяя 
различные хитрости с инструкцией ЕФОТУАГЕМСЕ, которые 
зависят от диалекта. Мы не можем запретить такое применение 
эквивалентности, но подобные игры с этой инструкцией не сви- 
детельствуют о зрелости программиста. 


1.9. Переработанный пример 


Теперь настало время пересмотреть пример программы, с ко- 
торого началась данная глава. Он будет проработан методом по- 
шагового уточнения. Чтобы воспользоваться этим методом, вна- 
чале разложим работу программы на небольшое число самых 
крупных шагов. Затем рассмотрим каждый шаг и уточним его, 
делая из одного шага несколько меньших шагов. Продолжаем 
разбивать каждый шаг на несколько меньших шагов, пока весь 
алгоритм не будет представлен ясными, простыми шагами. 

Чтобы вспомнить сущность исходной программы, вам сле- 
дует просмотреть ее заголовок в разд. 1.2. Повторим четыре ос- 
новных шага работы программы: 


1. Ввести каргы, содержащие идентификационные (инвен- 
тарные) номера книг и имеющееся количество книг. 

2. Отсортировать данные из входных карт в порядке возраста- 
ния инвентарных номеров книг. 

9. Ввести карты, содержащие номера книг и количество про- 
данных книг. 

4. Напечатать суммарный отчет: номера книг имеющихся в 
наличии и их количества. 


Эти пункты составляют первый уровень в нашем методе поша- 
гового уточнения. Теперь для дальнейшей детализации первый 
шаг разобьем на следующие шаги: 


1.1. Определить, сколько перфокарт (имеющихся в наличии 
книг) должно быть считано. 

1.2. Если не будет считано ни одной перфокарты, останов. 

1.3. Ввести и обработать перфокарты. 


Шаги 1.1 и 1.2 существенно детализированы, чтобы их можно 
было непосредственно запрограммировать. Шаг 1.3, однако, тре- 
бует дальнейшего уточнения. 

Разобьем его на шаги с 1.3.1 по 1.3.3 для каждой перфокарты 
имеющейся в наличии книги. 


1.3.1. Если для нового номера книги нет свободной памяти, 
то напечатать сообщение об ошибке и прекратить об- 


работку. | 
1.3.2. Ввети ВООКМО(МЕМТКУ) и ОТУ(МЕМТКУ.). 
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1.3.3. Проверить, не повторяется ли этот номер книги. Если 
да, напечатать сообщение об ошибке и проигнориро- 
вать данный номер. Если нет, увеличить МЕМТКУ. 


Так как карты с номерами книг не упорядочены, мы не можем 
применить бинарный поиск для шага 1.3.3. Вместо этого будем 
использовать обычный последовательный поиск. Для второго ша- 
га применим алгоритм быстрой сортировки, чтобы отсортировать 
данные. Мы не детализируем шаг 2, так как его уточнение 
в точности соответствовало бы алгоритму, приведенному уже 
в разд. 1.6. 

Шаг 3 включает несколько уточнений. Мы представим все 
уточнения сразу, поскольку многие из них соответствуют приве- 
денным на шаге 1. Можно описать пошаговую детализацию в 
указанном порядке, если вы себе ясно представляете логическое 
развитие шага 3. Важная особенность пошагового уточнения 
состоит в том, что это помогает вам составлять программу. Не 
стоит обращать внимание на некоторые технические ограничения, 
присущие процессу пошагового уточнения; постарайтесь извлечь 
° из него как можно больше. 


3.1. Определим, сколько считано карт с номерами проданных 
КНИГ. | | 
3.2. Если не считано’ ни одной перфокарты, останов. 
3.3. Обработаем карты проданных книг. 
РО для каждой считанной карты проданных КНИГ: 
Ввод СВООК и СОТУ, данные для одной книги. 
Ноиск СВООК в массиве ВООКМО. 
|“ МЕМТКУ=О, поиск окончен; номер не найден. 
РО для ]=1 до МЕМТВЮУ. 
| ВООКМО (Л) =СВООК, поиск окончен; номер 
найден. | 
[Е ВООКМО (7 > СВООК, поиск окончен; номер 
не найден. 
Если цикл оканчивается нормально, поиск окончен; 
номер не найден. 
Если номер не найден, печать сообщения об ошибке и 
ввод следующей перфокарты. | 
Если найден, то обработать данные о продаже книги. 
Если проданное количество меньше или равно имею- 
щемуся количеству, уменьшить имеющееся количество 
соответствующим образом; иначе установить имеющееся 
количество в нуль и напечатать сообщение. 


Шаг 4 включает только печать содержимого массивов 
ВООКМО и ОТУ. 
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Теперь можно избавиться от избыточных инструкций про- 
граммы с целью упрощения алгоритма. Выполняются два поиска: 
на шаге | и на шаге 3. По назначению они подобны, но не иден- 
тичны. Их можно свести в общую подпрограмму для выполнения 


ЗОВКОЧТИМЕ ГООКУ(ТАВГЕ,ТАВ$12,Е МТВУ, $5ОЮКТЕР, ЕОЧМО, \МНЕЮЕ,ОВО) 
С хина 
с ПОДПРОГРАММА ПОИСКА В ТАБЛИЦЕ 
С ВХОДНЫЕ ЗНАЧЕНИЯ: 
«ТАВГ. Е» -МАССИВ РАЗМЕРОМ «ТАВ$[7», В КОТОРОМ ИДЕТ ПОИСК 
ЭЛЕМЕНТА «ЕМТЮУ». ЕСЛИ ТАБЛИЦА УПОРЯДОЧЕНА ПО 
ВОЗРАСТАНИЮ, ТО ПЕРЕМЕННАЯ «5ОКТЕО» ИМЕЕТ ЗНАЧЕНИЕ ТВОЕ; 
В ПРОТИВНОМ СЛУЧАЕ ЕВАГБЗЕ. 
«ОВС» УПРАВЛЯЕТ ОТЛАДОЧНЫМ ВЫВОДОМ; НЕНУЛЕВОЕ 
ЗНАЧЕНИЕ ОВС ОЗНАЧАЕТ ТРАССИРОВКУ ПРИ ВЫХОДЕ ИЗ 
ПОДПРОГРАММЫ. 


УСЛОВИЯ ВЫХОДА: 
ЕСЛИ ЭЛЕМЕНТ НАЙДЕН, «ЕОЧМО» ИМЕЕТ ЗНАЧЕНИЕ ТРОЕ, 
«\УНЕКЕ»-ЭТО ИНДЕКС ЭЛЕМЕНТА ЕМТКУ В МАССИВЕ ТАВЁЬЕЕ. 
ЕСЛИ ЭЛЕМЕНТ НЕ БЫЛ НАЙДЕН, ТО «РООМО» ИМЕЕТ ЗНАЧЕНИЕ 
КАГ$Е, А ЗНАЧЕНИЕ «\НЕВЕ» НЕ ИЗМЕНЯЕТСЯ. , 
ПРОГРАММА ВЫПОЛНЯЕТ ПРОСТОЙ ПОСЛЕДОВАТЕЛЬНЫЙ ПОИСК. 
ЕСЛИ ТАВЕЕ ОТСОРТИРОВАНА, ТО ПОИСК ПРОДОЛЖАЕТСЯ ТОЛЬКО 
ДО ТЕХ ПОР, ПОКА НЕ БУДЕТ НАЙДЕН ЭЛЕМЕНТ, БОЛЬШИИЙ, ЧЕМ 
мк ЕСЛИ НЕ ОТСОРТИРОВАНА, НЕОБХОДИМ ПРОСМОТР ВСЕЙ 
ИЦЫ. 


ПРОГРАММИСТ: - - — ДАТА: - - - 
$8 ЗЗЗ&ЖЖУЯЕ Е Е Е З ЯЕЕ Е $ хх ха 


бвобообоосоооосооооооо 


` ЗАТЕЕК ТАВЗТУУ ТАВЕЕ(ТАВС ТУ} 9 ЕНТА 
О6ТСАЕ ЗОАТЕОХ РОНО › ЕНТАТ, ИНЕВЕ» 080, ОВОИТ 
БРАТА ОВОЦТ/&/ 


с ПРЕДПОЛОЖИМ, ЧТО ЭЛЕМЕНТ НЕ’ БУДЕТ НАЙДЕН 
с ЕСЛИ ТАБЛИЦА ПУСТА, НЕ НУЖНО ИСКАТЬ 
с ТЕ 4ТАВЗТЕ «ГЕ, 0) ВЕТУВМ 
с ЦИКЛ ДЛЯ АНАЛИЗА КАЖДОГО ЭЛЕМЕНТА 
_ рб 10 Т= 15ТАВ$12 
ТЕ (ТАВЕЕ(Т) „ЕО. ЕМТВУ) С0 ТО 50 
те ЗОВ 66.10 99 о, 60 ТО 10 
9 
с 10 СОМТТМИЕ ` 
С „ЕСЛИ ЦИКЛ ОКАНЧ. НОРМАЛЬНО, ТО ЭЛЕМЕНТ НЕ НАЙДЕН 
С 
с ПРИХОДИМ СЮДА, ЕСЛИ ЭЛЕМЕНТ НАЙДЕН 
О ОО а Е ид 
ИНЕВЕ = 1 
С ‚ 
С 


ОБЩАЯ ТОЧКА ВОЗВРАТА$ УСТАНАВЛИВ 
99 °ТЕР (086 „Е@. 0) ВЕТИВН ? АЕТСЯ РОИМО 

УЕ СЕС0УМО).НАТТЕ (0800Т›101) ЕМТАУ;, МНЕАЕ 

ТЕ еМОТ» „РОУМОЗ НАЦТЕ (0800Т,102} ЕМТВУ, ТАВ$12 
101 РОВМАТ $. ЕХТТ РАОМ ЗИВВь 100КУ: 1ТЕМ» 18, # РООКО АТ Рбб.*, 18) 
102 РОВМАТ {! ЕХ!Т РАОМ $088. 1.00КУ: ТЕМ! ? О ' 
ПХ "в ТАВЕЕ ЭТО 19 в ТЕМ» 16, ® МОТ РОУМО ТМ ТАВЕЕ*, 
ЕМО 
Рис.1.5. Подпрограмма поиска в таблице. (101: «выход из подпрогр. ЕООКУ: 
элемент», «найден в Позиции»; 102: «выход из подпрогр. (ООКУ: «элемент», 
«не найден в таблице».) 


1.9. Переработанный пример 111 


табличного поиска. Введем параметры (МЕМТКУ — 1) или 
МЕМТКЮКУ и ВООКМО (МЕМТКУ) или СВООК. Можно также 
добавить еще один параметр, чтобы показать, отсортирован 
массив или нет, так как только для поиска на шаге 3 требуются 
упорядоченные данные. Подпрограмма приведена на рис. 1.5. 

Процесс сортировки, хотя он встречается только однажды, 
может быть представлен в виде подпрограммы, чтобы обеспе- 
чить модульность рассматриваемой программы. Кодирование 
этой подпрограммы выполняется в соответствии с основными 
принципами разд. 1.6.2, и поэтому мы не приводим ее листинг. 

В программе имеется также несколько точек, из которых 
выдаются сообщения об ошибках. Эти инструкции следует выде- 
лить из программы, поскольку подобные сообщения не имеют 
прямого отношения к программе, как таковой, и могут затруд- 
нить ее чтение. Кроме того, этот модуль для первоначальной 
программной отладки можно запрограммировать попроще (толь- 
ко печать номеров сообщений об ошибке), а позднее его можно 
«приукрасить» вразумительными текстами сообщений об ошиб- 
ках. Подпрограмма в качестве параметров будет принимать номер 
ошибки и указание о том, фатальна ли ошибка (когда обработка 
не может быть продолжена), или это просто предупреждение 
(обработка может быть продолжена). Третьим параметром служит 
связанный с ошибкой инвентарный номер книги или 0 для тех 
ошибок, которые не имеют отношения к номеру книги. Приведем 
эту подпрограмму. 


$ИВВОИТТМЕ ЕВВМ$С (ЕААМО, ЕАТА!, ВООКМО) 

[> ПОДПРОГРАММА, ВЫДАЮЩАЯ СООБЩЕНИЯ ОБ ОШИБКАХ 
ТМТЕСЕВ ЕВАМО, ВООКМО,» ОЦТ ` 
ОСТСАЕ ЕАТАГ, 

РАТА ОИТ/6/ 
Г ВЫВОД СООБЩЕНИЯ ОБ ОШИБКАХ 
НАТТЕ {00Т,1} ЕВАМО 
1 РОАМАТ (* ЕВРОВ МУМВЕВ ®, 13» ® ОССОААЕО»* 
ТЕ {ВО0КМО „МЕ. 0) НЕТТЕ {00Т,2} вООКмд 
‚2 ЕОВМАТ {' ТМУОУТМб ВООК МИМВЕВ!’, 110) 
с НАСКОЛЬКО СЕРЬЕЗНА ОШИБКА? | " 
ТЕ мот. РАТАЬУ ВЕТУВМ 
УАТТЕ (00Т, 3) 
3 РОВМАТ $' ЕХЕСИТХОМ ТЕКМТМАТТМО" $ 
в 


4* ОШИБКА НОМЕР", ПРОИЗОШИЙТ \. 
$ ТСВЯЗАННАЯ С НОМЕРОМ КНИГИ" 
3$ "ВЫПОЛНЕНИЕ ПРЕКРАЩАЕТСА" 


Закончив все необходимые подпрограммы, раесмотрим тетерь 
главную программу. В этой программе мы применили одно из 
наших собственных предложений об использовании сигнальной 
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перфокарты для отметки конца каждой из двух частей входной 
колоды. Номер книги —|[ будет отмечать конец каждой части. 
Заметим, что при обращении к ЕКЕКМ$О мы использовали мне- 
монические имена переменных, такие, как ОУЕГОМ (ПЕРЕПЛ), 
РОРГ, (ДУБЛ), МЕМВК (НОВКН) и др. Благодаря этим име- 
нам нет необходимости помнить цифровые коды, связанные с 
различными сообщениями об ошибках. Аналогично мы исполь- 
зовали мнемонические обозначения для указания фатальной 
или нефатальной ошибки. Полностью программа приведена на 
рис. 1.6. 


« 


жа хохот оео 
ПРОГРАММА ИНВЕНТАРИЗАЦИИ КНИГ 


ЭТА ПРОГРАММА ВВОДИТ НАБОР НОМЕРОВ КНИГ И ИМЕЮЩЕЕСЯ 
КОЛИЧЕСТВО ЭТИХ КНИГ И ОБРАБАТЫВАЕТ ДАННЫЕ О ПРОДАЖЕ 
КНИГ В СООТВЕТСТВИИ С ПЕРВОНАЧАЛЬНОЙ ИНВЕНТАРИЗАЦИЕЙ. 
ПРОГРАММА ПЕЧАТАЕТ ЗАКЛЮЧИТЕЛЬНЫЙ ОТЧЕТ ОБ 
ИМЕЮЩИХСЯ. В НАЛИЧИИ КНИГАХ. 

ЕСЛИ СДЕЛАНА ПОПЫТКА ПРОДАТЬ БОЛЬШЕ КНИГ, ЧЕМ ИХ ИМЕЕТСЯ 

В НАЛИЧИИ, ПРОГРАММА ПЕЧАТАЕТ СООБЩЕНИЕ. 


ВХОДНЫЕ ДАННЫЕ: 

СЕРИЯ КАРТ С НОМЕРАМИ ПЕРВОНАЧАЛЬНО ИМЕЮЩИХСЯ 
КНИГ/КОЛИЧЕСТВА. 

КОЛОДА КАРТ ОКАНЧИВАЕТСЯ КАРТОЙ С ЧИСЛОМ -1. 

СЕРИЯ КАРТ С НОМЕРАМИ ПРОДАННЫХ КНИГ/КОЛИЧЕСТВА. 
КОЛОДА КАРТ ЭТОЙ ГРУППЫ ЗАВЕРШАЕТСЯ КАРТОЙ С ЧИСЛОМ — 1, 


ПРОГРАММА СОСТОИТ ИЗ ЧЕТЫРЕХ ФАЗ: 

1. ВВОД ПЕРВОНАЧАЛЬНЫХ ИНВЕНТАРИЗАЦИОННЫХ КАРТ; 

2. СОРТИРОВКА НАЧАЛЬНЫХ НОМЕРОВ КНИГ И МАССИВОВ 
КОЛИЧЕСТВА КНИГ: 

3. ВВОД КАРТ ДЛЯ ПРОДАННЫХ КНИГ; 

4. ПЕЧАТЬ ЗАКЛЮЧИТЕЛЬНОГО ОТЧЕТА О КНИГАХ, ИМЕЮЩИХСЯ 
В НАЛИЧИИ. | 


ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: 
ГООКУ: ВЫПОЛНИТЬ ПОИСК В ТАБЛИЦЕ: 
О5ОКТ: ОТСОРТИРОВАТЬ МАССИВ, СОДЕРЖАЩИЙ ДВА СТОЛБЦА; 
ЕЮКМ$0: НАПЕЧАТАТЬ СООБЩЕНИЕ ОБ ОШИБКЕ. 


ОСНОВНЫЕ ПЕРЕМЕННЫЕ: 
ВООКМО — НОМЕРА КНИГ В СИСТЕМЕ ИНВЕНТАРИЗАЦИИ; 


бообоосоооооооооо оообобооо 


ОТУ — КОЛИЧЕСТВО ЭТИХ КНИГ; 
ОТУ(Т) -КОЛИЧЕСТВО ВООКМО(Т); 
ВООК$ — МАТРИЦА, СОСТОЯЩАЯ ИЗ СТОЛЬЦОВ ВООКМО И ОТ; 
МЕМТВУ — ТЕКУЩИЙ НОМЕР КНИГИ; 
СВООК — ТЕКУЩАЯ КНИГА, ИСПОЛЬЗУЕМАЯ НА ШАГЕ 3; 
СОТУ — ТЕКУЩЕЕ КОЛИЧЕСТВО, ИСПОЛЬЗУЕМОЕ НА ШАГЕ 3; 
МАХВК$ — МАКСИМАЛЬНОЕ КОЛИЧЕСТВО НОМЕРОВ КНИГ (200); 
ОВС — УПРАВЛЕНИЕ ОТЛАДКОЙ: =0 ОТЛАДКА НЕ 
ПРОИЗВОДИТСЯ, =|1 ВЫЗОВЫ ПОДПРОГРАММ, =2 ВЫЗОВЫ 


ПОДПРОГРАММ И ПЕЧАТЬ ВХОДНЫХ ДАННЫХ, =3 ВЫЗОВЫ 
ПОДПРОГРАММ, ПЕЧАТЬ ВХОДНЫХ ДАННЫХ, ПЕЧАТЬ 
ТАБЛИЦЫ ПОСЛЕ СОРТИРОВКИ. 


ПРОГРАММИСТ: --- ДАТА: --- 
№ ооо 


бооооооооооооооо боооо 


Рис.1.6. Пересмотренная программа инвентаризации книг. (111: «элемент №», 
«книга. №», «количество»; 201: «отсортированная таблица книг»; 301: «Трас- 
сир: книга №, количество»; 351: «недостающее количество»; 401: «заключи- 
тельный отчет», «книга №—=имеющееся количество».) 


ТНТЕСЕЙ 800К$ (200,2) ‚ВО0КМО(200),9ТУ(200} ›СВООК» СОТУУМАХВК$ 
ТМ, 00 °.МНЕВЕ,МЕМТВУ 
ЕЧОТУАСЕМСЕ (800К$(1›1),ВООКМО В» {890К${1у2) › аТ\) 
с НОМЕРА СООБЩЕНИЙ ОБ ОШИБКЕ 
ТМТЕСЕЙ ОМЕСОМ, ООРЕ,МЕМВК, ОУЗОЕО,ЕОЕТ,ЕОЕ2, ОВС, ОВОиТ 
ОАТА ОМЕЕОНИ1 И, БИРЕ/2И, МЕМВКИЗИ, СУ$ 00/4 И, ЕОЕТИ5И , ЕОЕ2/6/ 
МНЕМОНИЧЕСКИЕ ИМЕНА ДЛЯ ВЫРАЖЕНИЙ: ОШИБКИ 


с 
с ФАТАЛЬНЫЕ /НЕФАТАЛЬНЫЕ » МАССИВ СОРТИРОВАННЫЙ/НЕСОРТИРОВАННЫЙ 
ЪОСТСАЕ ЕОУМО, РАТАЕ, ЗОАТЕО 


АТА РАТАСИ-ТАЧЕ. (.ЗОКТЕО/.ТАЦЕ. И 
ОАТА УМ/5/›ОЧТ/6/, МАХВК$/200/,ОВб/О/, ОВОиТИ6 А 


МЕМТ 
НЕ  ПРЕВЫШЕНЫ ЛИ РАЗМЕРЫ МАССИВОВ? 
100 Е (МЕМТАУ «СТ. МАХВК$} САГЕ ЕВАМ$С СОУРЕОМ,РАТАЕ, 0} 
ВВОД ПАРЫ НОМЕР КНИГИ/ КОЛИЧЕСТВО 
ЯЕАВ (1№,110,ЕМО=190) ВООКМО( МЕМТАУ } у ТУ (МЕМТАУ) 
‚. 4:10 РОВМАТ {2110} 
ТЕ $086 «СТ» 1} ЧУВТЕ {0804Т,111) МЕМТАУ, ВООКМО(МЕМТВУ] » 
„.“ х ЭТУ (МЕНТВУ ) 
"И ОЯМАТ {* ЕМТАУ Н№До*, 18, * ВООК №0.*, 110, # ОУАМТ1ТУ!, 110} 


КОНЕЦ ДАННЫХ? 
ТЕ (ВООКМО(МЕМТАУ} «ЕД» =11 60 ТО 200 


с ДУБЛИРУЮТСЯ ЛИ НОМЕРА КНИГ? 
320 СМЛ Е00КУ (ВООКМО, МЕМТАУ-1, ВООКМО(МЕМТАУ\, „МОТ. $ЗОВТЕО» 
х ЕОУМ№МО» ННЕВЕ» 086} 
_ ТР Ф.МОТ. Е09№0% МЕМТАУ = МЕМТАУ + 1 
ны р 00 ЕРУМО} САЬ. ЕАВМ$С {РУРЬ» «МОТ,РАТАЕ; ВООКНО(МЕНТАУ) } 


с 
с 
с же ФАЗА 1: ВВЕСТИ НАЧАЛЬНЫЕ ИНВЕНТАРНЫЕ ЗНАЧЕНИЯ ЖЖЖЖ 
с 
с 


з 
- ‹ ПРИХОДИМ СЮДА ВСТРЕТИВ КОНЕЦ ФАЙЛА, 
190 СА. ЕААМ$С (ЕОР1РАТАЕ, О» 


: `%%жк ФАЗА 2* СОРТИРОВКА ДАННЫХ . ж+ж 
КОНЕЦ ДАННЫХ» СБРОСИТЬ „›-1° 
МЕТА { оЫ и пака МЕМТВУ } > 
САМ. ОЗОАТ $в00К А , 
209 = {ОВС +бТ. 2} НАТТЕ {0800Т,201) (В00К$(Т}» = 1 НЕМТАУЗ 
201 ЕОВМАТ(# ЗОВТЕО В00К ТАВЬЕ:'/ 1041Х, 110} ) 


с 
© +#ж* ФАЗА 3: ОБРАБОТКА ЗАПРОСОВ НА ПРОДАЖУ +*** 


ы 300 ВЕАО {1М№,110,ЕМО=390} СВООК, САТУ 
ТЕ {086 „СТ. 1) МАТТЕ (0800Т,301} С800К, СОТУ 
301 ЕОВНАТ {* ТААМЗАСТТОМ ТВАСЕ: ВООК №0., ОЧУАМТ1ТУ:* з 2110} 
КОНЕЦ ДАННЫХ 2 
ЧЕ { СвоОК «Е@ о 1} са то 400 


с 

с НАЙТИ НОМЕР КНИГИ, ЧТОБЫ ОБРАБОТАТЬ ЗАПРОС 
Фи. тоОкУу (в00КмО, МЕМТКУ» СВООК, 5ОВТЕО, РУМО, ННЕАЕ+ 086) 
12 (Е0У№О» 60 Та 350 


НОМЕР КНИГИ ДОЛЖЕН БЫЛ БЫТЬ ВВЕДЕН НА ПЕРВОЙ ФАЗЕ 
ОШИБКА» ИИ КНИГИ НЕТ. ИГНОРИРУЕТСЯ ЗАПРОС НА ПРОДАЖУ 
САС ЕВВМ$С (МЕИВК, «МОТ» РАТАС»СВООК? 

50 ТО `200 


с КНИГА НАЙДЕНАЗ СМОТРИМ, ДОСТАТОЧЕН ЛИ ЗАПАС 
З (ОТУ(МНЕВЕ? „СЕ» СОТУ) 60 ТС 360 
с от ЗАПРОШЕНО БОЛЬШЕ; ЧЕМ В НАЛИЧИИ» ВЫВЕСТИ 
с СООБЩЕНИЕ И УКАЗАТЬ, СКОЛЬКО НЕ ХВАТАЕТ 
СА. "ЕВАМЗС (0%500 9 .МОТ-ЕАТАЕ, СВООК) 
МАТУ = САТУ — ЧТУ(ННЕВЕ) 
МАТТЕ {О0Т, 351} МОТХ 


с 
с. 
© 
с 


аа 


` 351 ЕОВМАТ(* ОЧЧАМТТТУ МОТ ЗНТРРЕО 1$ #!, 110% 
ОТУ(ННЕВЕ = © 
е 59 ТО 3060 


Продолжение Рис. 1.6. 
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С ПРАВИЛЬНЫЙ ЗАПРОС 
360 ОТУ(УНЕВЕ] = ЧТУ( НЕВЕ) - САТУ 
со ТО 30) 
С НЕПРЕДВИДЕННЫЙ КОНЕЦ ВВОДА В ФАЗЕ 3; 
С — СЧИТАТЬ, ЧТО ВСТРЕТИЛАСЬ „»-1“° КАК ПРИЗНАК КОНЦА ЭТИХ ААННЫХ 
390 САЁК ЕВВМ$6 (ЕО0Р2,,МОТ.РАТАК, О} 
С . 
с ж+** ФАЗА 4: ВЫВОД ОТЧЕТА +*** 
С 
400 17 (МЕМТАУ „1Е. 0) 60 ТО 500 | 
НВТТЕ (09Т,4)1) (ВООКМО (ТГ), О@ТУ(Ту, 1=1,МЕМТАХ ) 
401 ЕОВМАТ ('1ЕМОТМС (МУЕМТОВУ ВЕРОВТ! /// 
х БХ, 'ВООК МИМВЕВ. = ЧОАМТ1ТУ ОМ НАМО!/ 
х 5(3Х, 110, '=', 1101 131) @ 
С 
500 $ТОР 
ЕМО 


Продолжение Рис. 1.6. 
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Глава 2 


ПРОЦЕДУРЫ 


Умение широко применять подпрограммы — один из первых 
этапов в развитии профессиональных навыков программирова- 
ния. В гл. О и | было показано, что применение процедур повы- 
шает эффективность программы, делает ее более удобной для 
чтения. Такую программу проще писать и отлаживать, с ней 
легче работать. В этой главе расширяются основы, которые были 
вами уже усвоены, и объясняются более сложные свойства форт- 
ранных подпрограмм. 


2.1. Элементарные характеристики 
процедур Фортрана 


В языке Фортран допускаются процедуры двух типов функ- 
ции и подпрограммы. Функция — это процедура, которая всегда 
возвращает один результат, зависящий от значений передавае- 
мых ей параметров (аргументов). Подпрограмма применяется в 
более общих случаях и может возвращать несколько результатов 
в вызывающую программу или даже ничего не возвращать. 

Процедура Фортрана состоит из последовательности инструк- 
ций, первая из которых указывает ее имя, далее следует набор 
деклараций, тело процедуры и в конце инструкция ЕМО. В пер- 
вой инструкции процедуры указывается также ее тип (функция 
или подпрограмма) и набор формальных параметров. В деклара- 
циях содержится информация о типе размерности каждого пара- 
метра и каждой локальной переменной. 

Номера (метки) инструкций, входящих в состав программного 
модуля (главной программы или процедуры), рассматриваются 
как локальные в этом модуле. Поэтому в разных процедурах 
можно использовать идентичные метки. Инструкции, входящие 
в данный программный модуль, могут содержать ссылки на 
метки только тех инструкций, которые находятся внутри этого 
же модуля. 

Переменные и массивы, не являющиеся формальными пара- 
метрами, по умолчанию считаются локальными по отношению 
к модулю, в котором они определены. Это означает, что пере- 
менной К, встретившейся в одном программном модуле, отво- 
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дится ячейка памяти, отличная от той, которая будет выделена 
переменной К, встретившейся в каком-либо другом программном 
модуле, если, конечно, специально не оговорено противное. 
В разд. 2.6 мы покажем, как переменные и массивы могут быть 
объявлены глобальными. В приведенных ниже примерах все 
переменные и массивы будут формальными параметрами или 
будут локальными по отношению к модулю, в котором они объ- 
явлены. 


2.1.1. Функции 


Функция определяется как последовательность инструкций, 
первая из которых имеет следующий вид: 


[тип] ЕОМСТТОМ имя (список-форм-парам) 


Заканчивается функция инструкцией ЕМО. Тип функции может 
быть [МТЕСЕВ, ЮЕАГ,, ГОС[САГ, или он может быть опущен. 
Если тип функции явно не указан, то он определяется по первой 
букве ее имени (имена, начинающиеся с букв Т, Ф, К, 1, М, М, 
указывают на функцию целого типа; в противном случае тип 
функции считается вещественным). Список формальных парамет- 
ров состоит из набора переменных и массивов, связанных ссоответ- 
ствующими фактическими параметрами переменными и массивами. 

Вызов функции происходит при выполнении арифметического 
или логического выражения, содержащего имя функции, за 
которым в скобках следует соответствующий список фактических 
параметров. При вычислении функции ее имени присваивается 
значение результата; имя функции используется как перемен- 
ная. Последнее значение, присвоенное имени функции, рас- 
сматривается затем как результат вычисления функции. Воз- 
врат в вызывающую программу происходит, когда выполняется 
инструкция КЕТОКМ внутри функции. 

Функции следует применять лишь в том случае, когда необ- 
ходимо передать в вызывающую программу только одно число — 
результат вычисления функции. Хотя по правилам Фортрана 
явно не запрещено возвращать дополнительные результаты путем 
изменения значений параметров, этого делать не рекомендуется. 
В качестве примера рассмотрим следующую тривиальную функ- 
цию Е. Она возвращает значение 1--| для заданного значения 
параметра Г. 


[МТЕСЕВ ЕРОМСТ1ОМ ЕС) 
[МТЕСЕВ 1 

1=-Е1 

Е=1 

ВЕТОВМ 

ЕМО 
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При вычислении функции такого вида изменяется и значение 
ее параметра. Посмотрим на результат, когда функция Е вызы- 
вается в инструкции: 


К=Е()-Е()- 


где ] равно 3. При первом обращении к Е возвращаемый резуль- 
тат равен 4, и значение ] также стало равным 4. При втором 
обращении к подпрограмме-функции возвращаемый результат 
равен 5, и /] изменилось на 5. Как следствие, К принимает зна- 
чение 14= (4--5--5), и в качестве побочного эффекта Л присваи- 
вается значение 5. 

Это довольно неприятное обстоятельство, но еще хуже то, 
что в действительности все может произойти иначе. Некоторые 
компиляторы распознают и устраняют неэффективности. В таком 
компиляторе резонно предположить, что запись 


К=Е()-Е()- 
эквивалентна 
К=2+Е (7-1 


Но в этом случае К получит значение 12= (24-4), а не 14 и 
значением станет 4, а не 5. 

Нижеприведенная рекомендация не является правилом Форт- 
рана. Скорее это правило «хорошего тона» при программиро- 
вании на Фортране. Однако мы настоятельно советуем его со- 
блюдать: - 


Функция никогда не должна изменять значения своих 
параметров. 


Следует также избегать выполнения операций ввода/вывода 
внутри функции. Это ограничение является следствием того, 
что не всегда можно точно предугадать, произойдет ли обращение 
к функции. Например, для инструкции вида 


1Е ((1.0.0) .ОВ. (Е ().ЕО.К)) @0О ТО 7 


если Г/=0, нет необходимости вызывать функцию Е, чтобы оп- 
ределить, нужно ли передавать управление инструкции с мет- 
кой 7. В некоторых диалектах Фортрана функция Е вызывается 
всегда, в других не вызывается. Если в функции Е выполняется 
чтение перфокарт или вывод на печать, в различных версиях 
Фортрана могут получиться разные результаты. Во избежание 
этого будем руководствоваться следующим правилом: 


Функция не должна содержать инструкций ввода/вывода 
(за исключением, конечно, вывода, необходимого при 
отладке). 
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2.1.2. Подпрограммы 


Подпрограмма определяется как последовательность ин- 
струкций, первая из которых 


ЗОВКООТИ\Е имя [(список-форм-парам)] 


и последняя инструкция ЕМО. Подпрограмма вызывается по 
имени при выполнении инструкции 


САМ. имя [(список-факт-парам)] 


Результаты могут быть возвращены в вызывающую программу 
путем изменения значений одного или нескольких параметров 
подпрограммы. Возврат в вызывающую программу происходит, 
когда внутри подпрограммы выполняется инструкция КЕТОКМ. 


2.2. Передача параметров 


2.2.1. Основные правила связи формальных и фактических 
параметров 


При обращении к функциям или подпрограммам устанавли- 
вается связь между каждым фактическим параметром и соот- 
ветствующим ему формальным параметром. Первый фактический 
параметр связан с первым формальным параметром, второй — 
со вторым и т. д. Число фактических параметров должно соот- 
ветствовать числу формальных параметров. 

Фактический параметр может быть переменной, элементом 
массива, арифметическим или логическим выражением, мас- 
сивом. (Другие возможности объясняются в последующих раз- 
делах.) Формальный параметр может быть переменной или мас- 
сивом. Если формальный параметр — переменная, соответствую- 
щий ему фактический параметр может быть переменной, элемен- 
том массива или выражением. Формальному параметру-мас- 
сиву должен соответствовать массив или элемент массива. Тип 
(КЕАГ, ПМТЕСЕК или ГОССАТ.) каждого фактического пара- 
метра должен быть таким же, как и соответствующий ему тип 
формального параметра. Старайтесь согласовывать размерность 
формального массива и его размеры с соответствующими этому 
массиву фактическими параметрами. Однако правила Фортрана 
требуют только, чтобы размер (общее число компонентов) фор- 
мального массива не превышал соответствующего ему размера 
массива — фактического параметра. В том случае, когда в ка- 
честве фактического параметра передается элемент массива, 
считается, что размер массива в подпрограмме (формального 
массива) совпадает с размером массива, которому этот элемент 
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принадлежит, уменьшенным на число элементов, предшеству- 
ющих данному элементу массива. (См. в разд. 0.2, как массивы 
Фортрана хранятся в памяти.) 


2.2.2. Методика обеспечения связи параметров 


В соответствии с определением Фортрана, которое было дано 
Американским национальным институтом стандартов АМЗ|, 
фактический параметр, не являющийся выражением, ассоции- 
руется с формальным параметром (или передается в подпро- 
грамму) по имени; если фактический параметр — выражение, 
то связь организуется по значению. Смысл терминов передача 
параметров «по имени» и «по значению» был умышленно оставлен 
неопределенным, чтобы позволить разработчикам компиляторов 
выбирать методы реализации, наиболее подходящие для архи- 
тектуры конкретной машины. Разработчики Фортрана, предвидя 
несовпадение результатов, которое может получиться при раз- 
личных способах передачи параметров, наложили следующие 
ограничения: 


Если два или более формальных параметра ассоциируются с 
одной и той же переменной, элементом массива, или масси- 
вом, то ни одному из этих формальных параметров не может 
быть присвоено значение. 


Формальному параметру, который ассоциируется с выра- 
жением, не может быть присвоено значение. 


Теперь мы опишем общеупотребимые методы передачи пара- 
метров «по имени» и «по значению» и покажем, как могут быть 
получены различные результаты, если не учитывать сформули- 
рованных выше ограничений. 


2.2.3. Передача параметров по имени 


Ассоциация параметров по имени реализуется обычно одним 
из двух методов: по значению/результату или по адресу (по 
ссылке). Если связь параметров организована по адресу, то при 
каждой ссылке на формальный параметр происходит обращение 
к ячейке памяти, отведенной соответствующему фактическому 
параметру. Таким образом, каждое присваивание значения 
формальному параметру есть, по существу, присваивание фак- 
тическому параметру. В противоположность этому, если пара- 
метры ассоциируются по значению/результату, то значение 
фактического параметра при входе в подпрограмму заносится в 
область памяти, отведенную формальному параметру. При- 
своить значение формальному параметру означает — занести 
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это значение в область памяти, предназначенную для формаль- 
ного, а не фактического параметра. Однако при выполнении 
инструкции КЕТОКМ текущее значение формального параметра 
копируется обратно в область памяти фактических параметров. 

Передача параметров по адресу используется во всех диалек- 
тах Фортрана, с которыми мы знакомы, в тех случаях, когда 
формальный параметр является массивом. Почему — это станет 
понятно, на примере подпрограммы РКЫЪЗТ: 


ЗУВАОЦТТМЕ РАСТУТ (115Т,М) 
С жж ххх + 


С*. ЛЕЧАТЬ ПЕРВЫХ. М ЭЛЕМЕНТОВ ОДНОМЕРНОГО МАССИВА Ц$Т, м 


С*; ^^ 5 ЧИСЕЛ В СТРОКЕ 
Соня ка ааа ая + 
ТМТЕСЕК 11$1(500), М, Т, РАТ 
ОАТА РАТ/б/ 
ИВ1ТЕ (РАТ,200) (ЁТЗТ (ТТ), Гж 1, М) 
200 — РОВМАТ ('1', (20Х,515) } 
ВЕТУВМ 
ЕМС 


Если бы мы воспользовались передачей по значению/резуль- 
тату, то при вызове РЕГМ$Т 500 элементов фактического пара- 
метра-массива необходимо было бы скопировать в область па- 
мяти, предназначенную для массива ЕТ. Эти 500 значений 
надо было бы затем перенести обратно при выполнении инст- 
рукции КЕТОКМ. Ясно, что это расточительство как машинного 
времени, так и оперативной памяти. 

Различие результатов, получаемых при передаче параметров 
по адресу и по значению/результату, демонстрирует программа, 
приведенная на рис. 2.1. 

При передаче параметров по адресу выполнение инструкции 
присваивания ]=/--1 приводит к тому, что фактический пара- 
метр М получает значение 2; соответственно формальный пара- 
метр К также принимает значение 2. В результате выполнения 
инструкции \МКТЕ в подпрограмме ЗОВ будет напечатано 


]=2 К=2 


Посмотрим теперь, что произойдет, если параметры переда- 
ются по значению/результату. В этом случае и для У, и для К 
отводятся ячейки памяти, а при выполнении инструкции САПТ, 
Ти К будет присвоено значение [. После выполнения инструкции 
]=.-1! переменная /] получит значение 2, но это не вызывает 
соответствующего изменения значения К. Соответственно в 
результате выполнения инструкции \МКТЕ в подпрограмме $0В 
будет напечатано 


]=2 К=| 
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Различные результаты могут быть также получены при ис- 
пользовании двух различных диалектов Фортрана, в которых 
связь параметров организована по значению/результату. Обра- 
тимся вновь к нашему примеру. Какое значение получит М после 


Ск хх хх жж ххх жжжжжх 
С* ПРОГРАММА ДЕМОНСТРИРУЕТ РАЗЛИЧИЯ МЕЖДУ ДВУМЯ МЕТОДАМИ * 
С* ПЕРЕДАЧИ ПАРАМЕТРОВ. * 
<* ПРИ ВЫЗОВЕ ПОДПРОГРАММЫ Зов ПЕРЕМЕННАЯ М * 
с* ИГРАЕТ РОЛЬ ОБОИХ ПАРАМЕТР * 
к жжхжх К жж жяжаижяниж # 

ТМТЕСЕК М, РАТ 
с ДАТА РАТ/б/ 


с М ПРИСВАИВАЕТСЯ ЗНАЧЕНИЕ 1, ЗАТЕМ — ВЫЗОВ ЗВ, 
с в РОЛИ ОБОИХ ПАРАМЕТРОВ М 


М = 
СА. "ив (М; М} 


ПРОСЛЕДИТЕ ЗА ЗНАЧ. М. ДАЖЕ В РАЗНЫХ СИСТЕМАХ, 
ИСПОЛЬЗ. МЕТОД. ПО ЗНАЧ., РЕЗУЛЬТАТЫ МОГУТ РАЗЛИЧАТЬСЯ 
МАТТЕ {РАТ»200) М 
200  РОАМАТ {10Х» Мат, 11) 
| 5ТОР 
ЕМО 


ЗУВАОИТТМЕ $08 (3, К} 
ТМТЕСЕВ У, К, РАТ 
ОАТА РАТ/б/ 


МЕНЯЕМ ЗНАЧ. 1-го ФОРМ. ПАРАМЕТРА. ЕСЛИ АССОЦ, 


} По ССЫЛКЕ, ТО МЕНЯЕТСЯ ЗНАЧ, И 2-го ФОРМ, ПАРАМЕТРА, 
Е 


СМ. КАК ЭТО ВЛИЯЕТ НАК 
УАТТЕ (РЯАТ,200; 5 
200 — РОЯМАТ (11Х; 74=', т, ЗХ» 1К=!, 113 
ВЕТИВМ 
ЕМО 


Рис.2.1. Сравнение двух методов передачи параметров: по ссылке и по значению. 


зоо 


оо @ча 


возврата из подпрограммы? Если вначале в М заносится зна- 
чение }, а затем значение К, то последнее значение М равно зна- 
чению К, т.е. 1. Однако если К копируется раньше {, то М 
принимает значение 2. 


2.2.4. Передача параметров по значению 


Передача параметров по значению выполняется в диалектах 
Фортрана более согласованно, чем по имени. Метод передачи по 
значению, используемый для параметров-выражений, требует, 
чтобы память для значения параметра была выделена внутри 
вызывающего (а не вызываемого) программного модуля. Выра- 
жение вычисляется до входа в вызываемый модуль, и его зна- 
чение заносится в специально отведенную область памяти. 
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Проблемы возникают в том случае, когда фактический пара- 
метр — константа. В некоторых диалектах Фортрана в данной 
ситуации формальный параметр непосредственно ассоциируется 
с ячейкой памяти, в которой хранится константа. Это может 
привести к ужасному побочному эффекту. В качестве примера 


С ххх & 
С* ПРОГРАММА ПОКАЗЫВАЕТ, КАК МОЖЕТ ИЗМЕНИТЬСЯ ЗНАЧЕНИЕ КОНСТАНТЫ, * 
С* ПЕРЕДАННОЙ ПОДПРОГРАММЕ В КАЧЕСТВЕ ПАРАМЕТРА, * 
С* КОТОРОМУ ПРИСВАИВАЕТСЯ ЗНАЧЕНИЕ В ПОДПРОГРАММЕ. - з 
С% УДИВИТЕЛЬНО, НО ФАКТ: ВО МНОГИХ ДИАЛЕКТАХ (НО НЕ МАТЕ!У) ы 
с* ПРОГРАММА В РЕЗУЛЬТАТЕ НАПЕЧАТАЕТ з 
Скан кии кана яя а 
1МТЕСЕВ {, РАТ 


с - В ФОРТРАНЕ ТВМ 360-370 АЦПУ ИМЕЕТ НОМЕР 6 
с ОАТА РАТ/6/ 
с ВЫЗОВ А004 С ПАРАМЕТРОМ 1 
САМ. АООТ 41Ъ 
С | 
с ИЗМЕНИЛОСЬ ЛИ ЗНАЧЕНИЕ КОНСТАНТЫ? _ 


) =1 
МАТТЕ (РАТ,200} 3 
200 — МРОВМАТ (10Х, '4='» 119 
5ТОР 
ЕМО 


ЗИВВОИТТМЕ А001 (1$ 
ТМТЕСЕК Т 

Т = 141 

ЯЕТОВМ 

ЕКО 


Рис. 2.2. Изменение константы, переданной в качестве параметра подпро- 
рамме. 


рассмотрим программу на рис. 2.2. Если бы программа была 
выполнена при использовании одного из вышеупомянутых диа- 
лектов, то в ячейку памяти, предназначенную для хранения 
константы, равной 1, было бы записано значение 2 как результат 
выполнения подпрограммы АДО1. Можно представить себе вашу 
реакцию, когда вы узнаете, что в результате выполнения ин- 
струкции /=1 /] присваивается значение 2! 


2.3. Дополнительные сведения о процедурах 


В этом разделе мы вводим четыре нетривиальных понятия, 
относящихся к процедурам: альтернативные выходы из подпро- 
грамм, дополнительные входы в подпрограмму, процедуры в 
качестве параметров, регулируемые размерности. Мы приведем 
также примеры, иллюстрирующие каждое из этих понятий. 
В разд. 2.4 дан пример, объединяющий все это в одной программе. 
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2.3.1. Альтернативные выходы из подпрограмм 


Во многих диалектах Фортрана обеспечена возможность 
возврата из подпрограммы не к той инструкции, которая следует 
непосредственно за инструкцией, вызывающей подпрограмму, 
а к какой-либо другой. Для этого инструкция ЗОВКООТТЕ 
должна включать по одной звездочке (х) в списке формальных 
параметров для каждой метки инструкции, на которую может 
произойти возврат. Звездочки должны стоять перед любыми 
другими формальными параметрами. Хотя такой порядок рас- 
положения формальных параметров не обязателен для всех 
диалектов Фортрана, придерживаясь его, можно быть уверенным, 
что программа правильно сработает в другом диалекте, если, 
конечно, он обеспечивает возможность альтернативных выходов 
из подпрограмм. 

Выполнение инструкции вида 


РЕТОЮ Ми 


где и — целая константа или переменная, приводит к возврату 
из подпрограммы по п-му альтернативному выходу. Если К 
альтернативных выходов обозначены А звездочками, то список 
параметров в обращении к подпрограмме должен начинаться с ^ 
меток, играющих роль параметров. Каждая метка-параметр 
имеет вид &5$„ (или х$„ в некоторых диалектах), где $„ — номер 
иеполняемой инструкции в вызывающей программе, на которую 
может произойти возврат из подпрограммы. 

На рис. 2.3 приведена программа, содержащая подпрограмму 
с двумя альтернативными выходами. Первый альтернативный 
выход выбирается в том случае, если список СТЗТ отсортирован 
в порядке возрастания; второй — в случае, если Г.[ЗТ отсорти- 
рован в порядке убывания; если ГТЗТ не отсортирован, проис- 
ходит нормальный возврат из подпрограммы. (Замечание: если 
список отсортирован как по возрастанию, так и по убыванию, 
т.е. если элементы равны между собой, то он рассматривается 
как отсортированный в порядке возрастания.) 


Са + + хз зах * 
С» ПРОГРАММА “ВВОДИТ “список” Г. 15Т. м АНАЛИЗИРУЕТ ЕГО И ВЫДАЕТ 
С»« СООБЩЕНИЕ, УКАЗЫВАЯ, ОТСОРТИРОВ АН СПИСОК ИЛИ НЕТ 

С+« ИВ КАКОМ ПОРЯДКЕ 


С» ВЫЗЫВАЕМЫЕ ПРОГРАММЫ: ЗОВБТЕО 


С+« ОСНОВНЫЕ ПЕРЕМЕННЫЕ: 

С* 1115Т — АНАЛИЗИРУЕМЫЙ СПИСОК ЦЕЛЫХ ВЕЛИЧИН, 
С» ЕГО МАКСИМАЛЬНЫЙ РАЗМЕР 50. 

С М — ЧИСЛО ЭЛЕМЕНТОВ В СПИСКЕ 

С» ПРОГРАММИСТ: - - - ДАТА: --- 


ххх хухи++х 
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Рис. 2.3. Альтернативные выходы. (Текст в инстр. 4, 11, 21 — соответственно: 

"СПИСОК НЕ ОТСОРТИРОВАН"”, "СПИСОК ОТСОРТИРОВАН В ПОРЯД- 

Я РАСТАНИЯ`, "СПИСОК ОТСОРТИРОВАН В ПОРЯДКЕ УБЫВА- 
".) 
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ТМТЕСЕЯ 11$Т1(50), М, Г, ВОВ, РАТ 
ОАТА ВОВ/5И, РАТ/Б/ 


ВВЕСТИ АНАЛИЗИРУЕМЫЙ СПИСОК И ВЫЗВАТЬ ПОДПРОГРАММУ ЗОВТЕЙ 
ВОЗВРАТ НОРМАЛЬНОЙ, ЕСЛИ СПИСОК НЕ СОРТИРОВАН 
ВОЗВРАТ НА МЕТКУ 10, ЕСЛИ СПИСОК СОРТИРОВАН В ВОСХОДЯЩЕМ 
ПОРЯДКЕ, И НА МЕТКУ 20, ЕСЛИ В НИСХОДЯЩЕМ ПОРЯДКЕ -з 

АЕАО (20,2) М 

ЕОВМАТ (12) | 

ТЕ ((М№ „1Е. 0} „ОВ. (М „СТ. 50)) $ТОР 

ЕАО (ВОЮ,З}) (С1$Т(Т), Г = 1, № 

РОАМАТ (5110) 

СА. ЗОВТЕО (1610, &20, Ё15Т, М) 

МА1ТЕ (РАТ, 4) 


РОАМАТ (' 

ЗТОР 

МАТТЕ {РАТ, 11) 
РОАМАТ (* 

ТОР 

МАТТЕ (РАТ,21} 
РОАМАТ (. 
ТОР 

ЕМО 


ЗОВВОЧТИМЕ $0ВТЕО (ж,ж, МЗТ, М) 


С* ПОДПРОГРАММА $ЗОВТЕБ (ж, *, Ы$Т, №) 
с НАЗНАЧЕНИЕ; ПРОВЕРЯЕТ, ОТСОРТИРОВАНЫ ЛИ ЭЛЕМЕНТЫ СПИСКА, 


ЕСЛИ НЕТ, НОРМАЛЬНЫЙ ВОЗВРАТ 

ЕСЛИ В ВОЗРАСТАЮЩЕМ ПОРЯДКЕ, ВОЗВРАТ ВЕТУВМ1 
ЕСПИ ВСЕ ЭЛЕМЕНТЫ СПИСКА РАВНЫ, ВОЗВРАТ ВЕТИКМ1 
ЕСПИ В НИСХОДЯЩЕМ ПОРЯДКЕ , ВОЗВРАТ ВЕТИКМ 2. 


С* ПАРАМЕТРЫ: МЗТ — ЦЕЛЫЙ МАССИВ, РАЗМЕР 50 


М — КОЛИЧЕСТВО ЭЛЕМЕНТОВ СПИСКА 


`С* ПОБОЧНЫЕ ЭФФЕКТЫ: НЕТ 


опа во 


ос 


ао 


* НТЕСЕЯ 11$1(50), М, Т 
ОСТСАК АЗСЕМО, ОЕЗСМО 


СПИСОК ИЗ 1 ЭЛЕМЕНТА ОТСОРТИРОВАН . 
ТР (№ еЕЕ. 1) КЕТИВАМ1 


ПРЕДПОЛОЖИМ, ЧТО СПИСОК ОТСОРТИРОВАН В ВОСХОДЯЩЕМ 
и НИСХОДЯЩЕМ ПОРЯДКЕ. ИЗМЕНИМ ЗНАЧ. ЛОГИЧЕСКОЙ 
‚ПЕРЕМЕННОЙ, ЕСЛИ ВСТРЕТИМ „НЕУПОРЯДОЧЕННУЮ“ ПАРУ 
АЗСЕМО = «„ТАЦЕ. 
ОЕЗСМО = «ТАЦЕ. 


ИССЛЕДУЕМ КАЖДУЮ ПАРУ: ИЩЕМ „НЕУПОРЯДОЧЕННЫЕ“ ЭЛЕМЕНТЫ 
00 10т=д, М 

ТЕ (115$1Т(1-19 «СТ. Е15Т(1У) АЗСЕМО = „РАЗЕ» 

ТЕ 411$141-1) «1Т. Е1$1(19) ОЕЗСМО = «„РАГЗЕ. 
СОМТТМОЕ 


ВОЗВРАТ, ОСНОВАННЫЙ НА РЕЗУЛЬТАТЕ, ПРОСМОТРА ПАР СПИСКА 
ТР (АЗСЕМО) АВЕТИВМ\ 
12 (0Е$С№0) ВЕТИВМ2 


. ВЕТУВМ 


ЕМО 


Продолжение Рис. 2.3. 
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2.3.2. Дополнительные входы в процедуру 


Часто возникает такая ситуация, когда для двух или более 
близких по смыслу вычислений необходимо создать процедуры. 
Например, для аппроксимации синуса, косинуса и многих других 
тригонометрических функций можно применить, по существу, 
один И тот же алгоритм; различаются только значения некоторых 
начальных коэффициентов. 

При нормальном входе в подпрограмму ее выполнение на- 
чинается с первой исполняемой инструкции. Во многих вариан- 
тах Фортрана имеется инструкция ЕМТКУ, которая позволяет 
начать выполнение с других точек подпрограммы. Инструкция 
ЕМТКУ имеет следующий вид: 


ЕМТКУ имя [(список-форм-парам)] 


Если такая инструкция присутствует в подпрограмме, то при 
вызове с указанием имени входа выполнение подпрограммы 
начинается с первой исполняемой инструкции, следующей за 
этим входом. Если инструкция ЕМТКУ находится в функции 
и в обращении указано имя входа, то выполнение этой функции 
начинается с первой исполняемой инструкции, следующей за 
ЕМТКУ. Хотя это строго и не требуется, списки формальных 
параметров во всех инструкциях ЕМТКУ должны быть такими 
же, как в соответствующих инструкциях ЗОВКООТИМЕ или 
ЕОМСТЮМ. Кроме того, имя в ЕМТВУ должно иметь тот же 
тип, что и имя в соответствующей инструкции ЕИМСТТОМ. При 
несоблюдении этих рекомендаций программа может давать пра- 
вильный результат в одних диалектах Фортрана и ошибочный 
в других. 


| |МТЕСЕВ РОМСТОМ 1.00К! (ЭТ, М, АВС) 

Ск ях & 5 5 #Я Я У #Я У #Я + я я 
С# ФУНКЦИЯ ПОИСКА В ТАБЛИЦЕ. ЭТА ФУНКЦИЯ ВЫПОЛНЯЕТ ПОИСК 
С» ЗНАЧЕНИЯ ‘АРС’В ТАБЛИЦЕ ‘115Т’. ЕСЛИ 415Т’ ОТСОРТИРОВАНА. 
С#» ТО ВХОД-ПО ИМЕНИ ГООК?; ЕСЛИ НЕ ОТСОРТИРОВАНА (ТО — 

С*= ПО ИМЕНИ ‘ГООК!’. В ПОСЛЕДНЕМ СЛУЧАЕ ‘1[15Т’ СОРТИРУЕТСЯ 
С+ ПОДПРОГРАММОЙ ‘5ОВТ’. ЕСЛИ ‘АВС’ НАЙДЕНО В ‘Тик ТО 

С» ВОЗВРАЩАЕТСЯ ЗНАЧЕНИЕ К. ЕСЛИ ‘АВД” НЕ НАЙДЕНО, 

С# ВОЗВРАЩАЕТСЯ НОЛЬ. 


(+ ПАРАМЕТРЫ: 
С# —115Т — ТАБЛИЦА МОЖЕТ БЫТЬ ОТСОРТИРОВАНА ИЛИ 


Сж НЕ ОТСОРТИРОВАНА, ТИП ЦЕЛЫЙ, РАЗМЕР 50; 
Са М — ЧИСЛО ЭЛЕМЕНТОВ В ТАБЛИЦЕ ‘1.1$Т”; 
С АКС — ЦЕЛОЕ ЗНАЧЕНИЕ, КОТОРОЕ ИЩЕТСЯ В ‘[.1$Т’. 
* 
С+« ТОЧКИ ВХОЛА: 
С* ГООК! — ИСПОЛЬЗУЕТСЯ, ЕСЛИ ‘1,15Т’НЕ ОТСОРТИРОВАНА; 
С* ГООК2 — ИСПОЛЬЗУЕТСЯ, ЕСЛИ ‘'1.15Т’ОТСОРТИРОВАНА 
С+ В ПОРЯДКЕ ВОЗРАСТАНИЯ. 


С*+ ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: 
С+ 5ОКТ(Г15Т,М) — СОРТИРУЕТ М ЭЛЕМЕНТОВ ‘1,15Т’В ПОРЯДКЕ 


С* ВОЗРАСТАНИЯ ЗНАЧЕНИЙ 
С+ *»+х ПРИМЕЧАНИЕ х& ПОДПРОГР АММА $5ОКТ ЗДЕСЬ 
С* НЕ ПРИВОДИТСЯ. 


ххх ууу ххххх++ 


Ск ххх ая я 


Рис. 2.4. Пример дополнительных входов в процедуру. 
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НМТЕСЕВ $7 (50), М, АВС, 100К2 


И$Т НЕОТСОРТИРОВАН, ОТСОРТ ИРОВАТЬ:_ 
САН. $ОВТ (ЕТ$Т, №} 


ЗДЕСЬ ВХОД ДЛЯ ОТСОРТИРОВАН. {1$ Т 
ЕМТАУ 100К2 (115Т, М, АВС) 


СОДЕРЖИТСЯ ЛИ 'АВС’ В 'Ц5Т” 

00 10 КООК! = 1; М 
ТЕ {11$1(100К1) „СЕ. АВС) 60 ТО 20 

СОМТТМУЕ 


ПЕРЕХОД-—В "ИЗТ” НЕ СОДЕРЖИТСЯ | 
50 Т9 30 


со па оо 


о 


х 


ЕСЛИ 'АВб' ЕСТЬ, ТО В ПОЗИЦИИ 100К4. 
ТР {11$1(400К1} ›Е@, АВС) ВЕТУАМ 


АВС’ ОТСУТСТВУЕТ 
СУ УЕТ, ВЕРНУТЬ НОЛЬ 


ВЕТОАМ 
ЕМО 


Продолжение Рис. 2.4. 


оная дом 


ыо 
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На рис. 2.4 приведен пример функции с двумя входами. Вход 
через имя ГООК1 приводит к сортировке списка Е1ЗТ и затем 
к поиску АКС в [[$Т. Вход через точку ГООК2 предполагает, 
что таблица [1ЗТ уже отсортирована, и в этом случае осуществ- 
ляется только поиск АКО. В обоих случаях функция возвращает 
наименьшее значение К, такое, что АКа= ЗТ (К), и ноль, 
если АВС не найден. Заметим, что мы присваиваем результи- 
рующее значение только переменной ГООК1, поскольку все 
имена входов в подпрограмму-функцию ассоциируются с одной 
и той же областью памяти. В этом смысле имя ГООК] является 
синонимом имени ГООК2 в теле функции. 


2.3.3. Процедуры в роли параметров 


Имена функций или подпрограмм могут появиться в списке 
параметров других процедур. В этом случае чаще всего просто 
необходимо и всегда желательно записать инструкцию ЕХТЕК- 
МАГ. Она имеет следующий вид: 


ЕХТЕЮМАГ, список имен 


Все имена процедур, используемые в качестве параметров, 
должны быть перечислены в инструкции ЕХТЕКМАГ.. Любое 
имя процедуры, встретившееся в списке параметров, должно 
быть определено соответствующим образом. Если это не сделано, 
компилятор Фортрана будет рассматривать имя как простую 
переменную. 
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Рассмотрим задачу приближенного вычисления площади под 
кривой ] в интервале от точки а до точки 6. Простой способ ре- 
шения этой задачи называется методом трапеций. Согласно 
этому методу, площадь вычисляется так: 


(6—а)* (Г (а)--1(6))/2 


Это действительно площадь трапеции со сторонами (а, 0), 
(а, 1(а)), (6, [(5)), (6, 0). (См. левую часть рис. 2.5.) Лучшее 
приближение получается делением интервала [а, 6] на п подын- 
тервалов одинаковой длины: 


| 
| 
| 
| 
| 
| 
Г. 
| 
| 


фо ИРА р Фрезы фа она фиыь 9 


х даны бана ОО Фила тие оне = 


(1 Ь 


(Б-а) р 
"2 


Рис. 2.5. Правило трапеций. 


[а, а-Е (6—а)/т, [а-+ (6—а)т, а-Н 2+ (6—а)/п],.. .[Ь— (6—а)/п, 6] 
Тогда площадь в любом подынтервале [с, 4] будет приближенно 
равна 

(@—с)* ({ (©) +Р(а))/2 


Сумма всех п таких площадей дает аппроксимацию площади в 
интервале от а до 6 (см. правую часть рис. 2.5). 


Св в № * * + ххх хз зая 


* 
Сз ПРОГРАММА ВЫЧИСЛЕНИЯ ПЛОЩАДИ. КРИВОЙ Х +* 2-Х + 
Сз В ИНТЕРВАЛЕ МЕЖДУ 1 И 4. ПЛОЩАДЬ ВЫЧИСЛЯЕТСЯ + 
Сз ПРИБЛИЖЕННО ПО МЕТОДУ ТРАПЕЦИИ. + 
с ИНТЕРВАЛ РАЗБИТ НА 12 ПОДЫНТЕРВАЛОВ. * 

+ + 
Сз АВ ПОДПРОГРАММЫ: + 
С АВЕА(А, В, М, Е) - ИСПОЛЬЗУЕТ МЕТОД ТРАПЕЦИЙ ДЛЯ + 
Са ВЫЧИСЛЕНИЯ ПЛОЩАДИ ПОД КРИВОЙ Е * 
С» В ИНТЕРВАЛЕ ОТ А ДО В. М ОПРЕДЕЛЯЕТ ЧИСЛО * 
с ПОДЫНТЕРВАЛОВ. * 


* 
С« НЕОБЫЧНЫЕ СИТУАЦИИ: 
С* ФУНКЦИЯ ЕСМ ПЕРЕДАЕТСЯ В КАЧЕСТВЕ ПАРАМЕТРА + 
С* В ПОДПРОГРАММУ АБЕА. ФУНКЦИЯ ЕСМ. ВЫЧИСЛЯЕТ Х ** 2-Х. + 
С* ПРОГРАММИСТ: --- ДАТА --- * 
* 


С зона 


Рис. 2.6. Интегрирование по правилу трапеций. (Текст в инстр. 200: "ПЛО- 
ЩАДЬ ПОД Х** 2—Х МЕЖДУ 1 и “4".) 
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ТМТЕСЕЙ РКТ 
ВЕД АРРАОХ, АКЕА 
ОАТА РАТ/б/ 


НУЖНА ИНСТРУКЦИЯ ЕХТЕЯМАГ, ИНФОРМИРУЮЩАЯ КОМПИЛЯТОР» 
ЧТО ЕСН ЭТО ПОДПРОГРАММА, А НЕ ПЕРЕМЕННАЯ 
ЕХТЕВМА ЕСМ 


ВЫЧИСЛЕНИЕ ПЛОЩАДИ ПОД ЕСМ В ИНТЕРВАЛЕ ОТ1 ДО 4 
АРРВОХ = АВЕА(Т1., 4 ет 12, ЕСМ . 
МАТТЕ (РВТ,200) АРРВОХ 
200 — РОВМАТ('0', 5Х, ЭТНЕ АКЕА ИМОЕВ Х+*2-Х ВЕТИЕЕМ 1 АМО 4 1$', Е10.27 
-  $ТОР 
ЕКО 


оо соо 


КЕАС РОМСТТОМ ЕСМ (Х} 
С ххх хук ххх 
С* ВЫЧИСЛЕНИЕ Х\жЖ2 —- Х. ЕСЛИ НУЖНО ВЫЧИСЛИТЬ ПЛОЩАДЬ ПОД * 
С* БОЛЕЕ СЛОЖНОЙ ФУНКЦИЕЙ, ИЗМЕНИТЕ ЭТУ ПОДПРОГРАММУ * 
С* ВНЕСИТЕ ТАКЖЕ ИЗМЕНЕНИЯ В ГЛАВНУЮ ПРОГРАММУ, _ ж 
С* ЕСЛИ ИЗМЕНИТСЯ ИНТЕРВАЛ ИНТЕГРИРОВАНИЯ. | * 
С жж ххх жж жжжххжжжжжжжж ух жж 

ВЕАС Х 

ЕСМ = Х++2 - Х 

ВЕТИВМ 

ЕМО 


| ВЕАС РОМСТТОМ АВЕА (А, В, М, Е) 
С жж жяух 


ВЫЧИСЛЕНИЕ ПЛОЩАДИ ПОД Е ПО ПРАВИЛУ ТРАЛЕЦИЙ 


©* ПАРАМЕТРЫ" | о 

с* А - НИЖНЯЯ ТРАНИЦА ИНТЕРВАЛА (ВЕЩЕСТВЕННОЕ ЗНАЧЕНИЕ)» 

С* В - ВЕРХНЯЯ ГРАНИЦА ИНТЕРВАЛА (ВЕЩЕСТВЕННОЕ ЗНАЧЕНИЕ), 

с* М — ЧИСЛО ПОДИНТЕРВАЛОВ (ЦЕЛОЕ ЗНАЧЕНИЕ), 

с* Е — ВЕЩЕСТВЕННАЯ ФУНКЦИЯ. | 

СЖ ЖЖ жжжужх 
ТНТЕСЕВ М» ТГ 
ВЕАС А, В, Е, УМТВА\У, С, ВБ 


хи ничи 


с 

с ДЕЛИМ АВ НА ПОДИНТЕРВАЛЫ ДЛИНОЙ (В-А)/М. 

| ВЫЧИСЛИМ ПЛОЩАДЬ ТРАПЕЦИЙ НА КАЖДОМ ИЗ НИХе 

с ВЕ СУММИРУЕМ ПЛОЩАДИ ВСЕХ ТРАПЕЦИЙ. _ 
= О. 


ТНТАУГ. = {В-А} ГМ 
ро 10Т=1 М 
С = А+ ТА 11-1} 
0 = А+ ТМТАУСТ ° 
АКЕА = АВЕА + 1МТАУ* (РСС) + 2(0) 1/20 
10 — СОМТТМУЕ 
ЯЕТИУАМ 
ЕКВ 


Продолжение Рис. 2.6. 


На рис. 2.6 представлена процедура АКЕА с четырьмя па- 
раметрами: А, В, МиЕЁ. А и В имеют вещественные значения, 
представляющие соответственно начало и конец интервала, на 
котором выполняется аппроксимация. М — это число подын- 
тервалов, а Е — формальный параметр, используемый в каче- 
стве имени функции. Фактический параметр, связанный с Ё, 
должен быть именем функции вещественного типа. Эта функция 
определяет кривую, площадь под которой мы вычисляем. 
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2.3.4. Переменные размерности 


Написанные нами подпрограммы сортировки и поиска имеют 
общее назначение. В этих подпрограммах список, подлежащий 
сортировке и поиску, задан в качестве параметра. Однако при- 
менение подпрограмм ограничивается фиксированными разме- 
рами списка. Например, подпрограмма, приведенная на рис. 2.4, 
предназначена для поиска в таблицах, размер которых не пре- 
вышает 50 элементов. 

Формальные параметры-массивы могут иметь переменные, 
а не фиксированные размеры. Чтобы их задать таким образом, 
размер массива также должен быть указан в качестве параметра. 
Тогда или декларация О1МЕМЗ!ОМ, или декларация типа при- 
нимает следующую форму: 


Г1МЕМ$1ОМ 11$Т! (№, 11$Т2 (М, М) 


где Е1$Т1, [1$Т2, М№ и М — формальные параметры. Данная 
декларация объявляет, что []5Т| имеет размер М, а 11$Т2—. 
размер ММ. Поскольку массивы всегда ассоциированы пФ 
адресу, никакой области памяти для [5Т| и Е5Т2 фактически 
не отводится. ОМЕМЗ$ОМ только объявляет ШТ и ЕТ? 
массивами, ограничивает допустимые диапазоны изменения ин- 
дексов и позволяет вычислить позицию, занимаемую в памяти 
каждым элементом. При использовании данного метода факти- 
ческие параметры должны иметь размеры соответственно не 
меньше, чем Ми М№М. 


2.4. Поиск в таблицах при использовании 
хеширования 


В гл. 1 мы познакомили вас с двумя методами организации 
таблиц и поиска в таблицах из п элементов. Первый метод ос- 
нован на последовательном (линейном) поиске и требует в сред- 
нем порядка п сравнений для нахождения элемента. Второй 
метод основан на бинарном поиске. Он использует упорядочен- 
ный список и требует только примерно 105.(п) сравнений. Не- 
достатком бинарного поиска является то, что он требует упоря- 
доченной таблицы. Так как общие алгоритмы сортировки тре- 
буют в среднем выполнения по крайней мере лх|о5.(п) шагов, 
их применение сопряжено с довольно серьезными затратами, 
особенно если таблица при работе имеет тенденцию к увеличению 
или если число поисков мало. 

Третий общепринятый метод организации таблиц и поиска 
в Таблицах называется хешированием. Время, необходимое для 
вставки или нахождения элемента в таблице при использовании 
этого метода, зависит от степени заполнения списка на данный 
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момент и не зависит от размера списка. Приведенный ниже 
пример показывает зависимость среднего числа проб (т. е. срав- 
нений при поиске) от процента заполнения хеш-таблицы: 


Процент Среднее 


заполнения таблицы число проб 
10 1.06 
50 1.50 
75 2.50 
90 5.50 


Метод хеширования заключается в следующем. Мы выбираем 
функцию йЙй, которая отображает каждый элемент таблицы (на- 
пример, номер в телефонном справочнике) в последовательность 
цифр, задающих позицию этого элемента в памяти. Функция 


(Е) =ЕЬ— (2/10) *100--1 


например, ставит в соответствие любому А число в диапазоне 
от | до 100. Характерно, что если последние две цифры числа Е 
представляют собой число 4, то # (Е) =49--1. Таким образом, если 
последние две цифры значений К равномерно распределены между 
00 и 99, то значения Й (Е) будут равномерно распределены между 
| и 100. 

Идеальной хеш-функцией является такая функция, которая 
для каждого имеющегося или потенциального элемента данных 
задает единственную позицию в таблице. Этот элемент затем 
запоминается или разыскивается в своей позиции в соответствии 
с его хеш-кодом. Например, хеш-функция й, приведенная выше, 
была бы идеальной, если бы значения А находились в диапазоне 
между 0 и 99. Если, однако, мы имеем дело с девятью значащами 
цифрами (например, с номерами социального страхования), 
то для идеальной хеш-функции потребовалась бы таблица с раз- 
мером в миллиард слов. Ясно, что в общем случае диапазон 
значений больше, чем число машинных слов, по которым мы 
хотим рассеять элементы таблицы. Вследствие этого мы не 
можем с гарантией отвести свободное слово в таблице для каж- 
дого потенциального значения элемента данных. Таким образом, 
возникает коллизия: мы хотим вставить в таблицу величину К, 
а находим, что позиция И (Е) уже занята. При возникновении 
коллизии мы должны найти другую позицию для величины К. 
Частота, с которой возникают коллизии, и количество проб, 
необходимых для нахождения «вторичного» свободного места в 
таблице, как раз и определяют степень сложности хеширования. 

Для разрешения коллизий разработано большое количество 
различных способов. Здесь мы сконцентрируем наше внимание 
на самом простом способе, линейном опробовании. Если требу- 
ется вставить элемент А, то мы анализируем позицию Й (Е). Если 
позиция занята, пытаемся найти свободное место в позиции 
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й (Е) 1 [или в 1 при й (Е)=п]. В случае неудачи процесс продол- 
жается для й (^)--2, А (®)-3,... до тех пор, пока не будет най- 
дена свободная позиция или выяснится, что К уже содержится 
в таблице или что таблица уже заполнена до отказа. 

Следующий пример показывает весьма общее описание про- 
цесса инициализации, построения и поиска в хеш-таблице. Таб- 
лица состоит из И элементов; К — это элемент, который нужно 
вставить или найти в таблице; й — хеш-функция; все значения 
Е больше нуля. 


Инициализация: /Очистить все позиции в таблице/ 
даЫе ()<——1, г=1, п /Все позиции свободны/ 
Поиск: /Посмотреть, находится ли в таблице значение ключа #/ 


р<й (Е) /Начальная проба в хеш-позиции/ 
5=-р /Запомнить начальную точку 


Цикл 1: /Проверить р-ю позицию. При неудаче проверить следующую! 
если а4Ые (р)=, то возврат (’поиск завершен удачно в позиции 
Е’)/Ё найдено?/ | 
если {а (р)=—1, то возврат (’неудача’) /Найдена свободная 
ПОЗИЦИЯ? 
р<-р--1 /Приращшение для перехода к следующей позиции/ 
если р>п, то р! /Таблица рассматривается как круговая/ 
если р=5$, то возврат (’неудача’) /Обратно к начальной точке? 
перейти на цикл {1 /Проверить следующую позицию/ 


Вставка: /Вставить значение ключа #/ 
р<й (Е) /Начальная проба в хеш-позиции/ 
5р /Запомнить начальную точку 


Цикл 2: /Проверить р-ю позицию. При неудаче проверить следующую/ 
если а (р)=Ё, то возврат (’такой ключ уже есть’) /Найден?/ 
` если а (р)=—1, то /Свободное место найдено?/ 
начало /Вставить ключ в свободную позицию 
даб ([е (р)=Е 
возврат (’успех’) 
конец 
р=-р--1 /Приращение для перехода к следующей позиции/ 
если р>п, то р<-| /Таблица рассматривается как круговая/ 
если р=5, то возврат (’переполнение’) /Таблица полна?/ 
перейти на цикл? /Проверить следующую позицию/ 


На рис. 2.7 приведен набор подпрограмм, которые могут 
быть использованы для реализации изложенных алгоритмов 
работы с хеш-таблицами. Подпрограмма ПМТ выполняет инициа- 
лизацию таблицы. Подпрограмма НАЗН имеет две точки входа 
ГООКУР и МЗЕКТ. Одна точка входа служит для организации 
поиска в таблице, вторая — для вставки данных. Параметр 
ТАВГЕ представляет хеш-таблицу, К — это искомый или встав- 
ляемый элемент и Н — хеш-функция. Если вход в подпрограмму 
НАЗН происходит через ПМЗЕКТ, то выполняются следующие 
операции: 


5* 


СЖ жж жж кк жж ух 
С*ж ИСПОЛЬЗОВАНИЕ ХЕШ-ФУНКЦИИ ПРИ ОРГАНИЗАЦИИ ТАБЛИЦЫ И ПОИСКЕ. 
С* ПРОГРАММА ИЛИЮСТРИРУЕТ РАЗЛИЧНЫЕ ТОЧКИ ВХОДА, 

С* АЛЬТЕРНАТИВНЫЕ ВЫХОДЫ И РЕГУЛИРУЕМЫЕ РАЗМЕРНОСТИ 


ск . 

с* ВВОД 

Сж КАРТА, ОПРЕДЕЛЯЮЩАЯ КОЛИЧЕСТВО ВСТАВОК ( ФОРМАТ 13` $ 

С* — ПО ОДНОЙ КАРТЕ НА ВСТАВЛЯЕМОЕ ЗНАЧЕНИЕ ( ФОРМАТ 16 ) $ 

С* — ПО ОДНОЙ КАРТЕ НА ЧИСЛО. КОТОРОЕ ИЩЕТСЯ В ТАБЛИЦЕ ( ФОРМАТ 16 
СЖ у 


С* ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ? ^^ 


С*ж 
* 


ТМТТ, ТУЗЕВТ., 100КИР 


С 
С*ж ОСНОВНЫЕ ПЕРЕМЕННЫЕ — 


с*  ТАВЕЕ - ТАБЛИЦА, В КОТОРУЮ ПОМЕЩАЮТСЯ ЗНАЧЕНИЯ С ПОМОЩЬЮ 
с* ХЕШ - КОДА. ТИП - ЦЕЛЫЙ, РАЗМЕР 100 $ , 

С*  ТТЕМ$ - КОЛИЧЕСТВО ЦЕЛЫХ ЗНАЧЕНИЙ В ТАБЛИЦЕ (ТИП ЦЕЛЫЙ) 

с* | 

Сж ОГРАНИЧЕНИЯ * 

С%ж В ТАБЛИЦУ МОГУТ БЫТЬ ПОМЕЩЕНЫ ТОЛЬКО ПОЛОЖИТЕЛЬНЫЕ ЧИСЛА. 
С* ОТРИЦАТЕЛЬНЫЕ ВЕЛИЧИНЫ ОЗНАЧАЮТ СВОБОДНУЮ ОБЛАСТЬ 

С* —_. 

С* ПРОГРАММИСТ? - -- ДАТА: --- 


С жж жж жж жж жжжжжжжж ЖЖ 


м ча о оо 


пазх 
\л = . 


ооцааоан абЗыч 


ТМТЕСЕВ ТАВЕЕ (100), К. РОЗ, ГТЕМ$. ВОВ, РАТ 
ОАТА ВОВ/5/, РВТ/б/ 
ЕХТЕВМАЕ Н 


СНАЧАЛА ВСЕ ЭЛЕМЕНТЫ ТАБЛИЦЫ РАВНЫ -1 (ТАБЛИЦА ПУСТА). 


САШ- ТМГТ (ТАВЫЕ. 100) 


«2 
ВВОД КОЛИЧЕСТВА ЭЛЕМЕНТОВ. ЗАТЕМ ЗАПОМИНАЕМЫХ ЗНАЧЕНИИ» 
ВЫВОД СООБЩЕНИЯ ПРИ ПОЯВЛЕНИИ ДУБЛИРОВАННЫХ ЗНАЧЕНИЙ» 
СООБЩЕНИЕ ОБ ОШИБКЕ И ОСТАНОВ ПРИ ПЕРЕЛОЛНЕНИИ ТАБЛИЦЫ 
КЕАО (В0А,2) ТТЕМ$ / 
РОАМАТ (13) 
ОС 10 ТГ = 1, ТТЕМ$ 
КЕАО (ВО0В,6б) К 
РОВМАТ (16) 


УДАЧНАЯ ВСТАВКА - ПЕРЕХОД НА 10. ПЕРЕПОЛНЕНИР- НА 888. 
НОРМАЛЬНЫЙ ВОЗВРАТ ПРИ ДУБЛИРОВАНИИ ЗНАЧЕНИЯ 
САТС ТМ5ЕВТ (Е10», Е888, ТАБЕЕ, 100, К, РО$, Н}. 
ЧК1ТЕ (РАТ,Т) К, РО$ . 
РОЯМАТ (' ПОРЕТСАТЕ ТТЕМ', ТТ, # ЕО00№ АТ РОЗТТТОМ!, Т4Й 
СОМТТМУЕ 


ВЫВОД ТЕКУЩЕГО СОДЕРЖИМОГО ТАБЛИЦЫ 
НАТТЕ (РАТ,15) ТАВЕЕ 
РОВМАТ ('0',Т3ЗО» 'НАЗН ТАВЕЕ АЕТЕК АГ ТМЗЕАТТОМ$ ГИ ( 1018) 9 


ВВОД РАЗЫСКИВАЕМЫХ ЗНАЧЕНИЙ ДО КОНЦА ФАЙЛА + 

ДЛЯ КАЖДОГО ЗНАЧЕНИЯ К СМОТРИМ, ЕСТЬ ЛИ ОНО В ТАБЛИЦЕ. 

ЕСЛИ ДА, ТО ГДЕ НАХОДИТСЯ. ЕСИИ НЕТ, СООБЩЕНИЕ .. 
КЕАО (КОЯ,6.,ЕМО=999) К й 


ЕСЛИ К В ТАБЛИЦЕ НЕТ, ПЕРЕХОД НА 25, ИНАЧЕ ПРОДОЛЖЕНИЕ 

САЕК КООКИУР (#25, #25, ТАВЕЕ, 100, К, Роб, Н) 

МВТТЕ (РАТ,22) К, РОЗ 

РОВМАТ (' ТТЕМ*, 17, ' ЕОУМО АТ РОЗИТТОМ", 14} 
60 ТО 20 

НЕТТЕ (РАТ,26) К 

РОВНАТ (' ТТЕМ', 17, * МОТ Е00МО*) 
С0 ТО 20 


ВЫХОДИМ СЮДА ПРИ ПЕРЕПОЛНЕНИИ 
МАТТЕ (РКТ,889) 
РОВМАТ (' %%*% ТАВЕЕ ОУЕВЕЕОМ %%%1 }] 
ТОР 
ЕМО 
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ФОВАбИТТМЕ ТМТТ СТАВЕЕ, М) 
Си а ижжжжжижкики № & зевает нее 
с= СНАЧАЛА ВСЕ № ЭЛЕМЕНТОВ СПИСКА ТТАВЕЕ" ПРИРАВНИВАЮТСЯ -1 
С* ЭТО ОЗНАЧАЕТ, ЧТО ПОЗИЦИИ СВОБОДНЫ 
Ся жжжжкхжжжжжж ня к уе ини икьа 
ТНТЕСЕЯ М» ТАВЕЕСМ У» ЕМРТУ/-1/ 
00 10т1т=1, 
- ТАВЕЕ(1) = М ПЕУРТУ 
10 СОМТТМУЕ 
ВЕТОВМ 
ЕМО 


ТНТЕСЕВ РОМСТТОМ Н (К) 
кии жж же фиа ов кизииихя 


с*= ХЕШ-ФУНКЦИЯ: ПС ДАННОМУ К ВОЗВРАЩАЕТ 2-РАЗРЯДНОЕ`ЧЯСЛ О 


С* ИЗ 2 КРАИНИХ ПРАВЫХ ЦИФР К ПЛЮС 1 з 
Я Еревана ия кии 
ХМТЕСЕЙ К 
Н=кК- (К/100)*100 + 1 
КЕТУВМ 
ЕМО 


—  ЗОВВООТТМЕ НАЗН (№5 №» ТАВИЕ, М. К» РОЗ, Н) 


Скхжжжхжжж ж жж жжжжжж я ЖЖ 
Сж ВСТАВИТЬ ЗНАЧЕНИЕ К В 'ТАВЕЕ", ИСПОЛЬЗУЯ ХЕШ-ФУНКЦИЮ "Н'. 

Сж ЕСЛИ "ТАВЕЕ" НЕ ЗАПОЛНЕНА И *К' В НЕЙ. НЕТ. ТО ВЕТУВМ1 ПОСЛЕ "ВСТАВКИ кх 
Сж (ЕСЛИ `ОБРАЩЕНИЕ ВЫПОЛНЯЛОСЬ С ЭТОЙ ЦЕЛЬЮ). 

Сж ЕСЛИ "ТАВЕЕ* ЗАПОЛНЕНА И УК" В НЕЙ НЕТ. ТО АВЕТОАМ2 о 

С* ЕСЛИ \К' УЖЕ ЕСТЬ В ТАБЛИЦЕ. ТО ВЕТОВНа 

с* 

С* ПАРАМЕТРЫ ® 

‘сж  ТАВЬЕ- ХЕШ-ТАБЛИЦА® ТИП ЦЕЛЫЙ? РАЗМЕР М 

сж М — РАЗМЕР ТАБЛИЦЫ $ ТИП ЦЕЛЫЙ 

с* К `` КИЮЧ ДЛЯ ВСТАВКИ ИЛИ ПОИСКА? ТИП ЦЕЛЫЙ 

с*  №Р0$ — ПОЗИЦИЯ, КУДА ВСТАВЛЕНО ИЛИ ГДЕ НАЙДЕНО К* ТИП ЦЕЛЫЙ 

с* Н — ПОДПРОГРАММА ХЕШ-ФУНКЦИИ$ ТИП ЦЕЛЫЙ 


с ТОЧКИ ВХОДА: 

С* 1М5ЕКТ — ДЛЯ ВСТАВКИ К В ТАБЛИЦУ 

СЖ 100КИР -— ДЛЯ ПОИСКА К В ТАБЛИЦЕ 

Скжжжжжжжж жж ж жж жжжжжж ЖЖ ЖжхжжЖжхж 


ЗНТЕСЕА М» ТАВЬЕ(СМ)о Ку 20$» Н» $» ЕМОТУ/-17 
ЖОСТСАЬ РИТМ 


их хх чихх 


[> 
с ВХОД ДЛЯ ВСТАВКИ К В ТАБЛИЦУ РИТТМ <= ‹ТВИЕз 9 
с ЧТОБЫ УКАЗАТЬ, ЧТО НУЖНО ВСТАВИТЬ ЗНАЧЕНИЕ 

ЕМТАУ ТМ5ЕАТ (%, 4, ТАВЕЕ» № К» РО$у Н) 

РИТМ = + ТКЦЕе 
с с0 ТО 10 
с ВХОД ДЛЯ ПОИСКАК В ТАБЛИЦЕ. РИТТМ <=. ЕРАЕЗЕ о 9. 
с ЧТОБЫ УКАЗАТЬ, ЧТО ВСТАВЛЯТЬ К НЕ НУЖНО 

ЕМТАУ СООКИР (*, №, ТАВЕЕ, М, К» РО$. Н) 
е РИТТМ = «РАТЗЕ» 
с ОБЩАЯ СЕКЦИЯ. ЗДЕСЬ СХОДЯТСЯ ОБЕ ВЕТВИ 
с 
С ВЫЧИСЛИТЬ ХЕШ-ПОЗИЦИЮ ДЛЯ К. ЗАПОМНИТЬ ЕЕ 
с ДПЯ ФАЗЫ ЛИНЕЙНОГО ОПРОБОВАНИЯ 
10 Р0$ = Ник} 
с $ = Р0$ 
с ЛИНЕЙНОЕ ОМРОБОВАНИЕ — НАЙТИ своводную позицию 
с ЛЯ К ИЛИ УСТАНОВИТЬ. ЧТ 
с ВЫХОД НА 30. ЕСЛИ МЕСТО НАЙДЕНО. ВЕТИВМ, ЕСЛИ К НАЙДЕНО? 
с ВЕТИВМ2. , ЕСЛИ ТАБЛИЦА ЗАПОЛНЕНА И К В НЕЙ НЕТ 
20 ТЕ (ТАВЕЕ(РО$) «ЕС. К) ВЕТИЯРМ 
с ТЕ (ТАВЕЕ(РО$) ‚9. ЕМРТУ) 0 ТО 30 
с ТАБЛИЦА РАССМАТРИВАЕТСЯ КАК ЩИКЛИЧЕСКАЯ 

Р0$ = Р0$ + 1 
е ТЕ (Р0$ эСТ. М) Р0$=1, 
` 
с ЕСЛИ ВЕРНУЛИСЬ К ТОЧКЕ СТАРТА, ВЫЙТИ ИЗ ПРОЦЕДУРЫ 
1Е {Р0$ «ЕД. $) РЕТИВМ2 

с 60 ТО 20 
с НАЙДЕНО МЕСТО ДИЯ К$ ВСТАВИТЬ Ку ЕСЛИ ЗРЕБУЕТЫЯ 
30 ТЕ (РОТ!М) ТАВЬЕ(РО$} =К 

ВЕТИАМ1 

ЕМО 


Продолжение Рис. 2.7. 
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1. Если К уже имеется, скажем, в позиции ТАВГЕ (Р), то 
происходит нормальный возврат, а РОЗ присваивается зна- 
чение Р. 

2. Если К не найден в таблице и ТАВГЕ (Р) — первая встре- 
тившаяся свободная позиция, то ТАВЕЕ(Р) получает значение К 
и выбирается первый альтернативный возврат КЕТОКВМ1. 

3. Если К не найден и таблица полна, выбирается второй 
альтернативный возврат КЕТОКМ2. 

Если вход в подпрограмму НАЗН происходит через ГООКУР, 
то предпринимаются точно такие же действия, как и для ПМЕКТ, 
кроме пункта 2. Здесь выход происходит через первый альтерна- 
тивный возврат КЕТОКМУ, но К не вставляется в таблицу. 


2.5. Инструкции ВАТА в подпрограммах 


В гл. 0 мы обсудили применение инструкций ОАТА и де- 
клараций типа для инициализации значений переменных, мас- 
сивов И элементов массивов перед выполнением программы. 
Заметим, что при инициализации данных внутри подпрограммы 
можно не заботиться о начальных значениях формальных пара- 
метров. Это в общем-то понятно, поскольку формальный параметр 
получает значение только в результате ассоциации с фактиче- 
ским параметром. Поэтому начальное значение будет проигно- 
рировано. Более того, если передача параметров организована 
по ссылке, то формальным параметрам не будет отведена память, 
и поэтому невозможно сохранить никаких начальных данных. 


2.6. СОММОМ — инструкция Фортрана 
для объявления данных глобальными 


2.6.1. Локальные и глобальные данные 


За исключением формальных параметров, элементы данных 
(переменные и массивы), используемые внутри программного 
модуля (процедуры или главной программы), рассматриваются 
как локальные в этом модуле. Это означает, что переменная с 
именем А в любом независимо оттранслированном модуле от- 
лична от переменной А (или любой другой переменной), на ко- 
торую происходит ссылка внутри другого модуля. Такая лока- 
лизация имеет два основных достоинства. 

Во-первых, она позволяет двум или более программистам 
работать независимо над различными модулями некоторой боль- 
шой программы. Каждый программист может выбирать имена 
переменных, не беспокоясь, что они могут быть использованы 
другими программистами. 
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Во-вторых, уменьшается вероятность непреднамеренных по- 
бочных эффектов при взаимодействии между подпрограммами 
Фортрана. Если внутри подпрограммы ЗОВ используются дан- 
ные, которые либо имеют локальные имена, либо являются 
формальными параметрами, то в результате вызова и выполнения 
подпрограммы ЗОВ в вызывающей программе могут измениться 
только значения фактических параметров, которые были пере- 
даны подпрограмме. Это облегчает отладку программ по срав- 
нению с ситуацией, когда подпрограмма может модифицировать, 
помимо значений фактических параметров, еще и значения ка- 
ких-то других переменных вызывающей программы. Кроме 
того, программу легче изучать. Фактически можно обнаружить 
_ побочные эффекты подпрограммы, не имея даже ее полного 
текста. 

Однако возникают такие ситуации, когда проявляются не- 
достатки подразумеваемого по умолчанию локального статуса 
данных. Если большое количество программных модулей исполь- 
зуют один и тот же набор переменных и массивов или если для 
каких-либо модулей необходимо задать большое число парамет- 
ров, то списки параметров могут стать очень длинными, что 
естественно может привести к ошибкам. Поэтому в Фортране 
предусмотрены также глобальные переменные, т. е. переменные, 
общие для нескольких модулей. Для этой цели служит инст- 
рукция СОММОМ, к определению и обсуждению которой мы 
теперь обратимся. 


2.6.2. Стандартное применение инструкции 
СОММОМ 


Перед выполнением программы на Фортране для каждого 
ее модуля отводится память. Память подразделяется на две 
отдельные части. Первая часть содержит все машинные команды 
программы, вторая часть отведена под локальные переменные 
и константы. 

Кроме того, отдельный блок памяти отводится для использо- 
вания всеми модулями. Этот блок называется СОММОМ (общим 
блоком). Для того чтобы один модуль с помощью общего блока 
имел возможность разделять данные с другими модулями, среди 
его деклараций должна быть инструкция СОММОМ. Стандартная 
форма такой инструкции: 


СОММОМ имя,, имя», ..., имя 
В инструкции СОММОМ декларируется, что применительно к 


данному модулю первая ячейка в общем блоке отводится под 
имя,, следующая — под имя» и т. д. 
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Если инструкция СОММОМ слишком длинна, чтобы ее можно 
было уместить на одной перфокарте, она может быть продолжена 
по обычным правилам Фортрана или возобновлена посредством 
новой инструкции СОММОМ. Так, инструкция 


СОММОМ А, В, С 


равносильна инструкции 
СОММОМ А, В 
С 


* 
ИЛИ. 


СОММОМ А 
СОММОМ В, С 


и т. п. 
В качестве первого примера использования декларации 
СОММОМ рассмотрим следующие инструкции: 


[МТЕСОЕК РОГГАК, СЕМТ, 1$Т (2, 3) 
КЕАГ САЗН 
СОММОМ 11$5Т, САЗН, РОГГАВ, СЕМТ 


Если этот набор инструкций расположен в некотором про- 
граммном модуле А, то во время выполнения модуля общая 
область памяти будет организована следующим образом: 


[1$Т(1,1) Слово 1 
[.1$Т(2,1) Слово 2 
[.1$Т(1,2) Слово 3 
1.15Т(2,2) Слово 4 
[1$Т(1,3) Слово 5 
[4$Т(2,3) Слово 6 
‚ САЗН Слово 7 
РОГГАК Слово 8 
СЕМТ Слово 9 


Если некоторый другой модуль В содержит такой же набор 
инструкций, то при каждой ссылке внутри модуля В к Ы$Т, 
САЗ$Н, РОГГАК или СЕМТ происходит обращение к тем же 
адресам памяти, к которым осуществляется доступ по этим име- 
нам из модуля А. Таким образом, эта область данных становится 
не локальной для какого-то отдельного модуля, а общей для всех 
модулей, которые содержат соответствующую декларацию 
СОММОМ. 

На рис. 2.8 приведен простой пример использования ин- 
струкции СОММОМ. Программа читает данные, которые орга- 
низованы следующим образом: 
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СЖ кк хук хх жхжхжя жж ф & 
С* СЛИЯНИЕ ДВУХ СОРТИРОВАННЫХ СПИСКОВ. В СЛИТОМ СПИСКЕ ДУБЛИРОВАНИЯ 


С НЕТ. СПИСКИ ВВОДЯТСЯ С ПЕРФОКАРТ 


с+ ВВОД* 
С+ КАРТА, СОДЕРЖАЩАЯ ЧИСЛО ЭЛЕМЕНТОВ В 1-ОМ СПИСКЕ (ФОРМАТ Т 
С+ ПО ОДНОЙ КАРТЕ НА ЭЛЕМЕНТ 1-ГО СПИСКА (ФОРМАТ еоенАт 12) 


С% КАРТА, СОДЕРЖАЩАЯ ЧИСЛО ЭЛЕМЕНТОВ ВО 2-0М СПИСКЕ (ФОРМАТ 2) 


с* ПО ОДНОЙ КАРТЕ НА ЭЛЕМЕНТ 2-ГО СПИСКА (ФОРМАТ 14) 


с 
С*\ ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ® 
с*  АЕАО, МЕЯСЕ, РАТНТ 


Ск 


с* ОСНОВНЫЕ ПЕРЕМЕННЫЕ$ 


с* [1511 - ПЕРВЫЙ СПИСОК ЦЕЛЫХ ЗНАЧЕНИЙ® РАЗМЕР 50 
С*& 1.1512. - ВТОРОЙ СПИСОК ЦЕЛЫХ ЗНАЧЕНИЙ? РАЗМЕР 50 
с&  1Т5ТЗ - СПИСОК СЛИЯНИЯ ЕТ5Т1 и 115Т2 5 РАЗМЕР 100 
С* $1 — ЧИСЛО ЭЛЕМЕНТОВ ЕТ$Т1 

сх $2 — -— ЧИСЛО ЭЛЕМЕНТОВ ЕТ$Т2. 

с* $3 = ЧИСПО ЭЛЕМЕНТОВ 115ТЗ 

Сс ПРОГРАММИСТ? =-- ДАТА* --> 


Сжжжжижк ху ж 


с 
с 
с 


с 
с 


399 


Се х ха о ууфчх 


ТМТЕСЕВ $1. $2. $3. 11$Т11(50), 113Т2(50), 1$13(100) 


ОБЩАЯ ОБЛАСТЬ: СПИСКИ ДОСТУПНЫ ДАЛЯ МЕВСЕ И РАТМТ, 
ОБЛАСТЬ НЕДОСТУПНА ДлЯ ВЕАО 
СОММОМ $1, $2, $3, №1511, 11ЗТ2, Е15ТЗ 


ВВЕСТИ ДВА СПИСКА, СЛИТЬ И РАСПЕЧАТАТЬ . 
ЕСЛИ ПРИ ВВОДЕ ОБНАРУЖЕНЫ ОШИБКИ. ОСТАНОВ 
САЦ. ВЕАО (6999, 51, 115119 . . . 
СА. АЕАО (6999; $2, 11$12) - 
САС МЕАСЕ 
САГ РАМТ 
ЗТОР 
ЕМО 


ЗУВАООТТМЕ ВЕАО (*, $12Е, Ё1$Т} 


<* ВВЕСТИ РАЗМЕР, ЗАТЕМ ЭЛЕМЕНТЫ СПИСКА. 
<* ЕСЛИ РАЗМЕР НЕВЕРНЫЙ (МЕНЬШЕ 1 ИЛИ БОЛЬШЕ 50), ТО ВЕТИВМ1. 
<* ТО ЖЕ САМОЕ, ЕСЛИ КОНЕЦ, ФАИЛА у 


с жжжжжкххж 


100 


_ Рис. 2.8. 


ТАТЕСЕВ $17Е» &1$1(50), ВОВ, РАТ, 1 

ТАТА АОЯ/5/, РАТИБ/ * ` 

ВЕАО (А0А,100,ЕМО=888) $12Е 

РОВМАТ 412) . | 
ТЕ ((517Е «ЕТ. 1} „ОВ. ($11Е „СТ. 501} 60 ТО 886 
АЕАО (КОВ ,101,ЕМО=888) (1.15101): Е ® 1, 51221 
РОВМАТ - (14} 

ВЕТУВМ 


ПРИХОДИМ СЮДА В СИТУАЦИИ ОШИБКИ 
МАТТЕ (РАТ, 889) 
РОАМАТ (' #%% ЕААОА 1М№ ОАТА $441} 
ВЕТИАМ1 
ЕМО 


Использование СОММОМ в программе слияния. 


° (Текст в инст. 889: «Ошибка в данных»; 200: «О Слитый список».) 


жж жж жж уж жжжжж 


хаха жЖф& 


Кик кники хх 


+ 
*® 
РЗ 
* 
* 
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ЗИВАОИТХМЕ МЕВСЕ 
сх жжжжжжуж жж жж жж жж жжжх хжжжжжжж 
с* СЛИЯНИЕ СПИСКОВ 11$Т1 И Е15ТА В 1 ТЗ * 
<* ОСНОВНЫЕ ПЕРЕМЕННЫЕ? 
С+ 11$Т1- СПИСОК ИЗ ОБЩ‚. ОБЛ, ® ТИП ЦЕЛЫЙ МАКС, РАЗМЕР 50 
с* 113Т2- СПИСОК ИЗ ОБЩШ,. ОБЛ. $ ТИП ЦЕЛЫЙ; МАКС. РАЗМЕР 50 
с  ГТ5Т3- СЛИТЫЙ СПИСОК В ОБЩ. ОБИ. > . МАКС. РАЗМЕР 100 
С* 51 = ФАКТИЧЕСКОЕ ЧИСЛО ЭЛЕМЕНТОВ В 1Т5$Т1 (СОМмМОом) 
с*« $2 — = ФАКТИЧЕСКОЕ ЧИСЛО ЭЛЕМЕНТОВ В -:ЗТ2 (сОммОом) 
сж $3 — «ЧИСЛО ЭЛЕМЕНТОВ В СПИСКЕ ЬТЗТЗ (соМмМОм) 
'С* 80 ВРЕМЯ СЛИЯНИЯ - ЭТО РТЯ К ТЕКУЩЕМУ КОНЦУ 11$Т3 
с* 7: — РТВ ДИЯ 11511, УКАЗЫВАЕТ НА ТЕКУЩИЙ ЭЛЕМЕНТ 
- РТВ ДЛЯ ЕТ$Т2> УКАЗЫВАЕТ НА ТЕКУЩИЙ ЭЛЕМЕНТ 
ЖЖ ЖЖ ЖЖЖЖЕЖ Ж 


ЕКА КЕх 


ТМТЕСЕВ Р1, Р2, $1, $2, $3, &1571(50), 11$Т2(50)‹ 415734100} 
СОММОМ $1, $2. $3, ЕТ5Т1» Ь1$Т2, 11573 


С СТАРТ ОТ ВЕРШИНЫ КАЖДОГО СПИСКА 
Р1 = 1 
Р2 = 1 
$3 = 0 


с 
с из КАКОГО СПИСКА КОПИРУЕМ ЗНАЧЕНИЕ В [1513 
19 1Е (Р\ „СТ. 51 60 ТО 30 

1Е (Р? «СТ. $2} 60 ТО 20 

ТЕ {115114211 = 11$124Р21} 20» 40% 35 


С 
с ПРИХОДИМ СЮДА, ЕСА. КОПИРУЕМ ЭЛЕМЕНТ ИЗ а 
20 $3 = $3 + 
Ь1513(53) = 15Т(РЕ} 
Р1 = Р! + 1 
с с0 ТО 10 
с ОБА СПИСКА ИСЧЕРПАНЫ? ЕСЛИ ДА» ВЫХОД ИЗ ПОДПРОГРАММЫ 
30 — ЗЕ (Ра „бТ» 521 ВЕТУВН 


ПРИХОДИМ СЮДА, ЕСЛИ КОПИРУЕМ ЭЛЕМЕНТ ИЗ 11572 
$3 я $3 + 1 , 
11$73($3) = &1512(Р2) 


ОПУСКАЕМ ЭЛЕМЕНТ В [1512 (ЧТОБЫ НЕ ДУБЛИРОВАТЬ) 
Р2 = Р 

60 Т6 10 
ЕМО 


$ИВАОЦТТМЕ РАТМТ 
сея ео к ооо чена 


С* ПЕЧАТЬ СЛИТОГО СПИСКА 11$Т3. РАЗМЕР СПИСКА $3 
Саха о $ $4949.33 $ м 
]МТЕСЕВ $1, $2, $3, &1$11(501» 11$124501» 11$1341001х РАТ» $ К 
СОммМОм $1, $2, $3, ЕТ, №15$Т2. №1513 
РАТА РАТ/б/ , 
МАТТЕ (РАТ,200) (&1$Т3(1)у Т = 1, $3 
2009 РОАМАТ ('0 МЕАСЕО К15Т' ИИ &1Т) } 
ВЕТИУВМ 
ЕМО 


Продолжение Рис. 2.8. 
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Номер перфокарты Величина Комментарий 

1 п Целая величина в колонках |—2 
2 И Целая величина в колонках 1—4 
3 ]2 Как выше 
® ® 

п--1 п Как выше 

п--2 т Целая величина в колонках 1—2 

п--3 |2) Целая величина в колонках 1—4 

п--4 Ко Как выше 
® р] ® ® 

п--т-2 | Как выше 


Затем программа производит слияние набора целых величин 
(1)... т) и, ..., В) и печатает результат слияния. (Заме- 
чание: в данной программе предполагается, что величины | и № 
отсортированы в порядке возрастания.) 

Память, отводимая программе на рис. 2.8, будет организо- 
вана следующим образом: 


Команды главной программы | МАМ 


Команды подпрограммы ВЕАРО. 

Память для локальных переменных |, ВОВ, РКТ. 

Память для констант | и 50. РЕАО 
Если используется передача параметров по 

значению/результату, то память под ЗС Е. 


Команды подпрограммы МЕКСЕ. 
Память для локальных переменных Р1, Р2. МЕВСЕ 
Память для констант | и 0. 


Команды подпрограммы РК\УТ. 
Память для локальных переменных 1, РКТ. РЕ1МТ 
Память для константы 1. 


Слово 1 

Слово 2 

Слово 3 

Слова с 4 по 53 
Слова с 54 по 103 
Слова с 104 по 203 


СОММОМ 
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2.6.3. Несогласующиеся определения СОММОМ 

Во многих языках программирования переменные и массивы 
считаются глобальными, если доступ к одной и той же ячейке 
памяти осуществляется из разных модулей по одному и тому же 
имени. В Фортране, однако, глобальные переменные и массивы 
ассоциированы с адресами памяти не по именам (имена могут 
быть любыми), а по месту в общем блоке. Рассмотрим вновь 
модули А и В из предыдущего раздела, полагая, что модуль 
С содержит следующие инструкции: 


МТЕСЕК 9МТ1, 9МП2, АВКАУ (2, 3). 
КЕАГ МОМЕУ 
СОММОМ АККАУ, МОМЕУ, ОМГТ1, ОМ!Т2 


В этом случае общий биов для модуля С будет организован 
так: 


. АВВАУ (1,1) Слово 1 


АККВАУ (2,1) Слово 2 
АВКАУ(1,2) Слово 3 
-. АВКАУ(2,2) Слово 4 
АВКАУ (1,3) Слово 5 
АККАУ(2,3) Слово 6 
МОМЕУ _ ‚_ Слово 7 
ОМИ Слово 8 
ОмИ2 Слово 9 
но не так: 
[.1$Т(1,1) Слово 1 
1.1$Т(2,1) Слово 2 
Г1$Т (1,2) Слово 3 
Г15Т(2,2) Слово 4 
Е1$Т(1,3) Слово 5 
Г.1$Т(2,3) Слово 6 
САЗН Слово 7 
РОГ.ГАК Слово 8 
СЕМТ Слово 9 


Последнее представляет‘ собой распределение памяти для модулей 
А и В, а не для модуля С. Теперь значения массива АККАУ 
модуля С будут совпадать со значениями массива [1$Т модулей 
А и В, поскольку эти массивы ассоциируются с одной и той же 
областью памяти. Ссылки на МОМЕХУ, ОМГТТ и 9МГТ2 соот- 
ветствуют ссылкам на САЗН, РОГГАК и СЕМТ. 

Рассмотрим еще более крайний случай. Пусть модуль Р со- 
держит инструкции 

1МТЕСЕВ 1, © 


ВЕАГ А (5), $ (3) 
СОММОМ 1, А, 0, $ 
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которые задают следующее распределение общей области: 


Г, Слово 1 
А(1) Слово 2 
А(2) Слово 3 

Слово 4 
5(1) Слово 5 
5(2) Слово 6 
5(3) Слово 7 


Ссылка в модуле О на переменную [. обеспечит в результате 
доступ к тому же слову памяти, что и ссылка на Е[$Т (1, 1) в 
модуле А и В или на АКРЮАУ (1, 1) в модуле С; для А (1) отво- 
дится та же ячейка памяти, что и для Г 1$Т (2, 1) иАККАТ (2, 1), 
и т. д. Ссылки на ООГТАК и СЕМТ в модулях А и В, ОМП1 
и ОМГТ2 в модуле С не имеют аналога в модуле О, поскольку 
этот модуль связан только с первыми семью словами блока 
СОММОМ. 

Ясно, что несоответствия в описании общей области делают 
программу трудной для понимания. Более того, такая несогла- 
сованность часто приводит к ошибкам. Чтобы избежать потен- 
циальных затруднений и сделать программу более удобной для 
чтения, мы рекомендуем соблюдать следующее правило: 


Все модули, которые содержат инструкции СОММОМ, должны 
иметь согласованные описания структуры общей области. 


Лучший способ для достижения этого — подготовить один «эк- 
земпляр» общих деклараций, включая соответствующие декла- 
рации типов КЕАГ., ИМТЕСЕВ и ГОСТСАГ, а затем размножить 
этот экземпляр для каждого модуля, в котором используется 
блок СОММОМ. 


2.6.4. Блок СОММОМ с именем 


Рассмотренный нами в предыдущих двух подразделах тип 
СОММОМ называется безымячнным или непомеченным; общим 
блоком. Можно определить также другие, независимые общие 
блоки, называемые именными или помеченными общими блоками. 
Набор переменных и массивов, относящихся к общей области 
с именем, указывается в инструкции вида 


СОММОМ (имя) список переменных и массивов 


Перед выполнением программы отводится по одному блоку 
памяти для каждой отдельной помеченной общей области, ко- 
торая была объявлена внутри какого-либо из программных 
модулей. 

Блок СОММОМ с именем часто используют в программах, со- 
стоящих из двух или более наборов подпрограмм, таких, что 
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подпрограммы одного набора взаимодействуют друг с другом 
и не взаимодействуют с подпрограммами других наборов. Каж- 
дый набор в этом случае имеет свою собственную помеченную 
общую область. При использовании этого способа (вместо слия- 
ния всех общих областей в один блок) снижается вероятность 
непреднамеренного изменения какими-либо подпрограммами об- 
щих данных. Ошибки в этом случае с большей вероятностью 
будут носить локальный характер. 


2.6.5. Взаимосвязь инструкций СОММОМ 
и ЕОШУАЕЕМСЕ 


Переменные или массивы внутри общей. области могут быть 
объявлены эквивалентными каким-либо локальным переменным 
или массивам. Если соответствующая эквивалентность установ- 
лена, то память для такой локальной переменной или массива 
не выделяется, поскольку она уже отведена в общем блоке. Эк- 
вивалентности такого вида могут быть использованы во многих 
ситуациях, рассмотренных в гл. 1 (например, при обработке 
многомерных массивов как ряда одномерных с целью повышения 
эффективности). Существует, однако, одно ограничение при 
установлении подобной эквивалентности: эквивалентная ло- 
кальная область не должна «сдвигать влево» начало общего 
блока. Поясним на примере следующей последовательности 
инструкций: 


ТМТЕСЕВ А(20), В(16), С» О, Е( 6) 
Соммом В, С, О 
ЕСИТУАСЕМСЕ (С,Е(1}), (С, А(201) 


Общая область включает массив В, переменные С и ВР и имеет 
длину 18 слов. Она начинается с элемента В (1). Первая пара в 
декларации ЕФЗЛУАГЕМСЕ устанавливает, что переменная С 
и элемент массива Е (1) ассоциируются с одним и тем же словом 
памяти. Так как О в общей области непосредственно следует за 
С, то возникает соответствие между Р и Е(2). Хотя это плохой 
способ установления соответствий, но такая эквивалентность 
допустима. Возникает побочный эффект, заключающийся в 
расширении общей области от 18 до 22 слов, т.е. изменяется 
«правая граница» общей области. 

Вторая пара в декларации Е/ОТУАЕГЕМСЕ (С, А (20)) за- 
дана неверно. Так как элемент В (16) в общей области непосред- 
ственно предшествует переменной С, то ’В (1) становится эквива- 
лентным А (4). Это приводит к тому, что элементы А (1), А (2) 
и А(3) должны предшествовать элементу В (1), в связи с чем 
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происходит сдвиг начала общего блока. Так как общему блоку 
может предшествовать в памяти другой общий блок или область, 
принадлежащая к какому-либо программному модулю, то это 
может привести к непредсказуемым последствиям и даже к уни- 
чтожению команд программы. 

Можно установить эквивалентность между переменными 
общих областей и локальными переменными, но не разрешается 
устанавливать эквивалентность общей области с формальными 
параметрами или другой общей областью. Первое из этих ог- 
раничений логично, так как формальные параметры должны 
быть ассоциированы с соответствующими им фактическими 
параметрами, а не с какими-либо фиксированными общими 
переменными или массивами. В целесообразности второго ог- 
раничения можно убедиться на следующем примере: 


ТМТЕСЕВ А, В, С, О, Е ы 
СОММОМ/СОМ1/ А, В 

СОММОМ/СОМ2г/ С, 0 

ЕСИТУАСЕМСЕ (А,В), (А,С), (0,Е), 4В,Е) 


Первая пара (А, В) содержит противоречие. Внутри общего блока 
СОМ1 две переменные нельзя описывать как эквивалентные, 
поскольку они связаны с разными словами этого блока. Пере- 
менной В предписано находиться одновременно в двух участках 
памяти. Вторая пара (А, С) также нелогична, так как общие 
блоки СОМ1 и СОМ2 представляют собой раздельные, непере- 
крывающиеся области памяти. Хотя третья и четвертая пары 
по отдельности правильны, в совокупности они не верны, так 
как их объединение в инструкции Е/ФОТУАГЕМСЕ приводит 
к тому, что переменным В и Р отводится одно и то же слово 
памяти. 

Просуммируем теперь ограничения, действующие при ис- 
пользовании ЕФОТУАГЕМСЕ с элементами данных, принад- 
лежащими общим блокам СОММОМ: 


1. Эквивалентность не должна «сдвигать влево» начало 
общего блока. 

2. Переменные или массивы одного общего блока нельзя 
описывать как эквивалентные. 

3. Переменные или массивы в общем блоке не могут быть 
эквивалентны формальным параметрам. 


2.6.6. Инициализация элементов данных 
в общих блоках 


По правилам Фортрана не разрешается инициализация лю- 
бых переменных или элементов массивов, входящих в общий 
блок без имени. Однако данные можно инициализировать в 
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помеченном общем блоке. Чтобы это сделать, следует создать 
неисполняемый программный модуль, называемый подпрограм- 
мой ВГОСК ПАТА. 

Подпрограмма ВГОСК ПАТА начинается с инструкции 


ВГОСК РАТА 


завершается инструкцией ЕМОШО и не содержит ничего, кроме 
СОММОМ с именем, деклараций типа, ОМЕМЗ!ОМ и РАТА. 
Приведем пример подпрограммы ВГОСК ПРАТА: 

ВЕОСК ОАТА 

ТМТЕСЕВ А, В, С(3), 042,2) 

КЕАС Е( 4,2), О. В 

СОММОМ/РАЗ $1/ А, В, Е 

СОММОМ/РА$ $2/ С, 0, 09, В 

ОАТА А/15/, Е/8*О.0/, 0/1.,2,3,4/ 

ЕМО 


Здесь указано, что помеченный общий блок РА$$1 содержит 
три элемента А, ВиЕ. А иЕ инициализируются начальными 
значениями, а В — нет. Общий блок РА$$2 состоит из четырех 
элементов С, О, © и К. Только переменной О присваивается 
начальное значение, в то время как переменные С, С и К имеют 
непредсказуемые значения. 


2.7. Функция-оператор 


Помимо процедур-функций, язык Фортран позволяет про- 
граммисту определять простые функции, внутренние по отноше- 
нию к программному модулю, в котором они определены и в 
котором они вызываются. Эти функции называют фиункциями- 
формулами или фунчкциями-операторами. Каждая функция- 
оператор определяется одиночной инструкцией присваивания и 
помещается после всех деклараций перед первой исполняемой 
инструкцией программного модуля. Общая форма такой ин- 
струкции: 

имя (а,, а›,..., а.) =выражение 


где имя — имя какой-либо переменной, а,, аз, ..., а, — фор- 
мальные параметры и выражение — любое арифметическое или 
логическое выражение. Выражение не должно содержать ссылок 
на элементы массивов или на функцию-оператор, которая ранее 
не была определена внутри того же модуля. Имя определяет 
тип функции. 

Функция-оператор вызывается подобно любым другим функ- 
циям: Встретившись с вызовом такой функции, компилятор 
действует таким же образом, как если бы мы просто подставили 
соответствующее выражение, заменив каждый формальный па- 
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раметр фактическим параметром. Например, если мы опреде- 
ляем функцию ЗАМРЕЕ как 


ЗАМРЕЕ (У, 2)=У+(7-- У) —1, 
то инструкция 
ВЕЗОТТ= А--$АМРЕЕ (А, В) 


компилируется так же, как если бы мы записали 
ВЕЗОТТ= А+ (А+ (В-- А)*=2— 1.) 


Заметим, что переменная Г, никак не связана с фактическими 
параметрами, так как она не входит в число формальных пара- 
метров. 

Функции-операторы не уменьшают потребности в памяти, 
что обычно достигается при использовании процедур функций. 
Их основное достоинство состоит в том, что программы, в ко- 
торых содержатся функции-операторы, легче читать, они по- 
зволяют сократить утомительное написание общеупотребимых 
арифметических и логических выражений. В свою очередь это 
приводит к уменьшению количества ошибок, так как програм- 
мисты обычно становятся менее бдительными, если работа носит 
монотонный характер. Применение функций-операторов может 
помочь при изменении программы, например, если понадобится 
изменить что-либо в часто встречающихся вычислениях. 

В качестве примера использования функции-оператора рас- 
смотрим способ эффективного хранения в памяти матрицы А, 
в которой все значения выше главной диагонали равны нулю 
(т. е. если 7>Т, то А (Т, Г)=0). Такая матрица называется ниж- 
ней треугольной матрицей и используется довольно часто. 
Если А — нижняя треугольная матрица размером 50 на 50, 
то распределение памяти посредством инструкции 


Р1МЕМХЗ1ОМ А (50, 50) 
расточительно, так как из 2500 слов 1225 будут содержать ну- 


левые значения. Более эффективным оказывается распределение 
памяти при помощи инструкции 


Р1МЕМЗЮМ А(1275) 
В этом случае на (, Л)-компоненту А (Г>Т) можно ссылаться 
как на А ((1+ (1—1))/2-Е УТ). Определим функцию-оператор 
1МОЕХ (Г, Л= (1*(1-1)/2-Е7 
Тогда при ссылке на компоненту (1, Г) мы будем писать А ((МОЕХ 


(Т, Г)), если, конечно, [>] и если данный диалект языка позво- 
ляет вызывать функции в индексном выражении. 
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2.8. Заключительный пример — генераторы 
случайных чисел 


2.8.1. Понятие псевдослучайной последовательности 


Когда приходится отлаживать сложную программу, одна из 
наиболее трудных задач — сгенерировать подходящие пробные 
значения данных. Пусть, например, нужно сгенерировать но- 
мера социального страхования, которые необходимо ввести в 
тестируемую программу. Мы, конечно, не будем вводить все 
возможные числа, так как общее их количество составляет | мил- 
лиард. Вместо этого постараемся подобрать какое-то ограничен- 
ное количество пробных значений (например, 1000 чисел). Хо- 
телось бы, чтобы эти значения были случайным образом рас- 
пределены по всему диапазону возможных чисел. Если бы все 
пробные номера социального страхования находились в диа- 
пазоне от 0 по 999, это не дало бы удовлетворительных резуль- 
татов. 

Один из методов, посредством которого мы могли бы решить 
нашу задачу: бросать 10-гранную игральную кость с гранями, 
пронумерованными от 0 до 9. Каждый бросок игральной кости 
дает случайное число. Девять бросков дают нам случайно вы- 
бранный номер социального страхования, а 9000 бросков обес- 
печивают 1000 необходимых тестовых чисел. Вопрос состоит 
в том, как написать программу, которая могла бы генерировать 
случайные числа, ведь все машинные программы выполняются 
в детерминированной (неслучайной) форме. Для того чтобы 
понять, как можно написать такую программу, вначале рас- 
смотрим, какими свойствами должна обладать случайная по- 
следовательность. 

Вообще говоря, события можно считать случайными, когда 
каждое событие (выборка числа) не зависит от каких бы то ни 
было предшествующих событий. В этом смысле даже такая по- 
следовательность из 1000 чисел, каждый член которой равен 
555026281, может быть результатом случайной генерации 9-раз- 
рядных десятичных чисел. Когда мы используем термин «случай- 
ный», по существу мы имеем в виду однородное распределение по- 
следовательности чисел в требуемом диапазоне (от 0 по 999999999). 
Мы, вероятно, ожидали бы, что из 1000 чисел примерно 500 
находились бы в диапазоне от 0 до 499999999. Более того, мы не 
ожидали бы часто повторяющихся сочетаний, периодичности 
и т. д. Например, последовательность 0, 5, 10, 15,... не прием- 
лема, хотя ее числа равномерно распределены. Последователь- 
ности, удовлетворяющие вышеописанным критериям, часто на- 
зывают исевдослучайными, так как они внешне выглядят случай- 
ными, но не содержат аномалий, которые могут иметь место в 
действительно случайных последовательностях. 
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2.8.2. Мультипликативный генератор случайных 
чисел 


В области методов генерации случайных последовательно- 
стей выполнено множество исследований '). К числу изученных 
и найденных вполне удовлетворительными методов относятся 
так называемые мультипликативные методы. 

Генерируемая последовательность определяется стартовым 
числом г(0), называемым началом отсчета, и формулой 


г (Е-- 1) = (а=г (Е)) по модулю (т), 


вычисляющей следующее число последовательности. Так, первое 
число такой последовательности равно 


г (1) = (ахг (0)) по модулю (т), 
второе число 
г (2) = (а*г (1)) по модулю (”1) 


и т. д. Свойства последовательности, генерируемой этим методом, 
существенно зависят от выбора значений г (0), аи т. Хороший 
выбор этих значений для одной ЭВМ может оказаться совершенно 
неудовлетворительным для других ЭВМ. Часто значение т вы- 
бирают как значение, превышающее наибольшую целую вели- 
чину, представимую на данной ЭВМ. Такой выбор имеет два 
достоинства: во-первых, он позволяет распределять числа в мак- 
симально большом возможном диапазоне и, во-вторых, модуль 
функции для такого значения т может быть тривиально вычислен 
на различных ЭВМ. 


2.8.3. Интегрирование по методу Монте-Карло 


Теперь мы приведем программу, в которой случайные числа 
используются для приближенного вычисления площади под 
некоторой кривой (см. рис. 2.6, где был продемонстрирован 
другой метод решения этой задачи). Метод, к которому мы об- 
ратимся здесь, обычно называют методом Монте-Карло. Он 
позволяет аппроксимировать площадь под кривой [ в интервале 
[а, 6]. Нарисуем прямоугольник с вершинами (а, 0), (а, В), (6, 1) 
и (5, 0). Площадь такого прямоугольника Фпрямоиг=Й* (6—9). 
Площадь под кривой { в интервале [а, 6] можно аппроксимиро- 
вать произведением бир»моугеР;, где Р; — приближенно вы- 
численная часть прямоугольника, расположенная под кривой | 
(рис. 2.9). Метод интегрирования Монте-Карло, представленный 


1) См., например, Кнут Д. Искусство программирования для ЭВМ, т. 2, 
гл. 3 — М.: Мир, 1977.— Прим. ред. 
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на рис. 2.10, позволяет оценить значение Р,; путем генерации 
большого числа случайных точек (1000) внутри прямоугольника 
и вычисления процентной доли тех из них, которые попали в 
область ниже кривой [. 


блрямоце=А х(6 -#) 


Площабь под кривой 5=5, рямоуё 2, 
где Р — часть прямоугольника, 
нохобящаяся под крибой.Г.. 


д 7.) 


Рис. 2.9. Интегрирование по методу Монте-Карло. 


Генератор случайных чисел КАМО, приведенный в данном 
примере, мультипликативный. Он предназначен для использо- 
вания на машинах ВМ 360-370. Генератор вырабатывает веще- 
ственные числа в интервале [0, КМАХ], причем ВМАХ служит 
в качестве его единственного аргумента. Вначале генератор 
вырабатывает случайное целое число & в диапазоне от | до 231—] 
(число 231—1] является наибольшим целым числом, представимым 
на [ВМ 360-370). Число 5 затем нормализуется в интервале от 0 


СЖ ЖЖ 
С* АППРОКСИМАЦИЯ ПЛОЩАДИ ПОД КРИВОЙ Х**2-Х В ИНТЕРВАЛЕ ОТ 1 ДО 4. 

С*® ИСПОЛЬЗУЕТСЯ МЕТОД, МОНТЕ-КАРЛО. 

С* 


* 
ж 
* 
* 
С* ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: АВЕА * 
с* = 
ж 


с* ПРОГРАММИСТ; —->- ДАТА. --- 
жж 
‚ `ТМТЕСЕВ РАТ 
_ * ВЕАЬ АРРКОХ: АЙКЕА 
‚ РАТА РАТ/б/И 


о ФУНКЦИЯ ОПРЕДЕЛЯЕТСЯ ПОДПРОГРАММОЙ ЕСМ 
имя ЕСМ ПЕРЕДАЕТСЯ В КАЧЕСТВЕ ПАРАМЕТРА 
ЕХТЕАВМАЕ ЕСМ 


ВЫЧИСЛИТЬ ПЛОЩАДЬ И НАПЕЧАТАТЬ РЕЗУЛЬТАТ. 
ВЕЛИЧИНА 12, ПЕРЕДАВАЕМАЯ В КАЧЕСТВЕ 1-ГО ПАРАМЕТРА, УКАЗЫВАЕТ 
НАИБОЛЬШЕЕ ЗНАЧЕНИЕ В ИНТЕРВАЛЕ. ОТ 1 ДО 4. 
ЭТО НУЖНО ДЛЯ АЛГОРИТМА ИНТЕГРИРОВАНИЯ 
АРРАОХ = АВЕА(12.т 10009 1.» 4.» ЕСМ 
ИВ1ТЕ {РАТ,200} АРРАОХ 
200 — РОАМАТ ('0', 5Х» *ТНЕ АВЕА. УМОЕК Х*+2-Х ЕВОМ 1 10 4 15', 210.2) 
ТОР 
ЕМО - 


опа яааяд 


Рис. 2.10. Программа интегрирования по методу Монте-Карло. 
(Текст в инстр. 200: «Площадь под кривой Хж2—Х от 1 до 4».) 


2.8. Заключительный пример 


КЕАК РУМСТТОМ ЕСМ (Х) / 
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С жк оооа а ефжякж 


* АЕТ ЗНАЧЕНИЕ Хжж2-Х 
жа я аж яж жж 


С жж жжжжжжжж жж жж жж жж жж ж жж жж жж жж ЖжЖЖЖЖжЖ 
С%$ ИНТЕГРИРУЕТ ПО МЕТОДУ МОНТЕ-КАРЛО ПЛОЩАДЬ ПОД ФУНКЦИЕЙ 'Е! 

С* В ИНТЕРВАЛЕ ОТ А ДО В. 

С% ПАРАМЕТРЫ: 

Сх  НТСН - НАИБОЛЬШЕЕ ЗНАЧЕНИЕ Р В ИНТЕРВАЛЕ ОТ А ДО В 

с* (Тип ВЕАС) 

<« М — ЧИСЛО СЛУЧАЙНЫХ ТОЧЕК НА ПЛОСКОСТИ ДЛЯ ВЫЧИСЛЕНИЯ 

ск ПЛОЩАДИ ПОД КРИВОЙ Е (ТМТЕСЕК) | 

сх А — НАЧАЛО ИНТЕРВАЛА (ТИП ВЕАГ) 

С В — КОНЕЩ ИНТЕРВАПА (ВЕАЬ) 

с*« Е — Функция, ПОД КОТОРОЙ ВЫЧИСЛЯЕТСЯ ПЛОЩАДЬ (ВЕАГ) 

С* 

С* ОСНОВНЫЕ ПЕРЕМЕННЫЕ? и 

С+ НТ$. - ЧИСЛО СЛУЧАЙНЫХ ТОЧЕК ПОД КРИВОЙ (ТМТЕСЕЕ) 

СЖ  ТМТУАЬ- РАССТОЯНИЕ МЕЖДУ В ИА (ВЕЛГ) 

СЖ 

©* ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ ? 

[6 КАМО, ЕГОАТ 

С ж ж жжжжжжжх жжжжжжжжжжжжжжх жжжжжжжжж 


ооо 


лов 
о 


оо 


ВЕАС Х 

ЕСМ = Хж*2 - Х 
ВЕТУАМ 

ЕМО 


ВЕАЕ РОМСТГОМ АВЕА (НТСН. А, В, Е) 


ТМТЕСЕА М; Т, НТ$ 
КЕАС НШСН, А; В, МТУАЬ, Х, У 


ВЫЧИСЛИТЬ М СЛУЧАИНЫХ ТОЧЕК И ПОДСЧИТАТЬ 
ЧИСЛО ››ПОПАДАНИЙ““ (ТОЧКИ ПОД КРИВОЙ Е) | 
ТМТУАЕ = 8 - А 
н11$ = 0 ая 
00 10 т=1, М 
У = ААМО(НТСНТ 
Х = ВАМО(ТМТУАС$ + А 
ТЕ (Р2(ХЬ ›бЕ» \1 НИТ$ = Н1{Т$+1 
СОМТТМИЕ се 
ЛИОЩАДЬ ВЫЧИСЛЯЕТСЯ КАК ОТНОСИТЕЛЬНОЕ ЧИСЛО „ПОПАДАНИЙ“”» 
УМНОЖЕННОЕ НА ПЛОЩАДЬ ПРЯМОУГОЛЬНИКА ‚. ОГРАНИЧЕННОГО ТОЧКАМИ 
(А,0), (А, НТН) › (В, нген), (в,0) | 
АВЕА = НЕОНж 1МТУАЬ»* (ЕБОАТ (НТТ$)/М) 
ВЕТУЯМ 
ЕМО 


КЕАС ЕУМСТТОМ ААМО (ВМАХ) 


ххх жж жж 
ВЫЧИСЛЯЕТ СЛУЧАИНОЕ ВЕШЕСТВЕННОЕ ЧИСЛО `В ИНТЕРВАЛЕ ОТ 0 ДО ВМАХ. 
ПРОГРАММА ГОДИТСЯ ДЛЯ 32-РАЗРЯДНОГО ДОПОЛНИТЕЛЬНОГО КОДА. 
В ЧАСТНОСТИ, ОНА РАБОТАЕТ НА 1ВМ 360-370 

жж жж жж жж ужа я жх 


КЕАЕ АМАХ 
ТМТЕСЕВ 1ААМО, МОЕТ, САВСЕ 
ФАТА 1ААМО/1317462673/, М\/\Т/65539/, 1АВСЕ/2141483641/ 


ВЫЧИСЛИТЬ НОВОЕ СЛУЧАЙНОЕ ЧИСИО (0Т1 до 2*%*31-1) 
ТВАМО = ТААМО * МАТ 


$2 СРААМО „ЕТ. 0) Т1ВАМО = {ТВАМО + ТАВСЕ? + 1 


ВЫЧИСЛИТЬ ТРЕБУЕМОЕ ВЕЩЕСТВЕННОЕ, ЧИСЛО 
КАНО = ЯМАХ+(ТААМО-1} / (ЬААбЕ-1) 
КЕТИЕМ 
ЕМО 


Продолжение Рис. 2.10. 


ххх яя ях ххх 


* 


+++ 


150 Гл. 2. Процедуры 


до КМАХ. Нормализация выполняется вычислением значения 
(в—1)/(2"—2))+ЕМАХ. 

При изучении приведенного примера следует помнить, что 
генератор случайных чисел КАМО предназначен специально для 
машин ВМ 360-370. Он может не подойти для другой ЭВМ. 
Следует также знать, что, хотя методы Монте-Карло могут да- 
вать очень хорошие результаты, их сходимость обычно намного 
медленнее, чем сходимость других методов, таких, например, 
как метод трапеций. 


Упражнения 


2.01. Проанализируйте ситуации, которые возникают при изменении первого 
параметра следующей функции М 


122 


$ = 
ТЕ т.о. 0} „ОВ. (МСТ, 4).Е9.4)23 ИЮТЕ {6;209 $ 


20 ЕОВМАТ (112) 
ТОР 
ЕМО 


ТМТЕСЕВ РОМСТТОК НЕТ, 4. 
ЗЕ (.бТь 124 


М= т 
ВЕТУВК 
ЕМО 
2.02. Рассмотрите следующую программу: 
СОММОМ Т,4 
+=2 
4 = 3 


СА 508 (ТР 

(6,20) 1 К 

20 РОВМАТ (3112) / 
0 


ЕМО 


ЗИВВОЙТТМЕ $08 (К 
СОММОМ ТУ (К) 
Т=Е 

К=у+1 

= т 

ВЕТИАК 

ЕМО 


Какие значения будут напечатаны для переменных [, Ли [., если 
а) Ги Г. передаются в подпрограмму. ЗОВ по значению /` результату? 
6) Ги 1. передаются в подпрограмму ЗОВ по адресу (ссылке)? 


2.03. Используя альтернативные выходы, напишите инструкцию САШ. и 
подпрограмму, которые выполняют следующие действия. Инструкция САГШГ, 
передает числовые параметры 3.*Х+*2, 4.7, 2..(Х—7) и А\$. Подпрограм- 
ма имеет соответствующие формальные параметры А, В, Си О. Она вычисляет 
значение ОП=В+=2—4*+АзжС. Если значение О положительно, выполняется 
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нормальный возврат. Если О равно нулю, подпрограмма передает управ- 
ление на метку 20 вызывающей программы. Если О отрицательно, управление 
передается инструкции с номером 99. 


2.04. Напишите вещественную функцию, имеющую две точки входа ЗОМ и 
АВ$$ЗОМ и два параметра А и М. Если происходит вход по имени ЗОМ, то 
возвращается сумма первых М элементов вещественного списка А. При входе 
через АВЗЗОМ возвращается абсолютное значение этой суммы... Подпрограм- 
ма, которую вы напишете, должна содержать только один цикл, суммирующий 
элементы А. Проверьте работу вашей подпрограммы с соответствующей глав- 
ной программой. 


2.05. Напишите вещественную функцию с двумя точками входа, называе- 
мыми ЕМАХ и ЕМИУ, и четырьмя параметрами Е, А, В и М, где Е — вещест- 
венная функция, А и В являются вещественными значениями, представляю- 
щими начало и конец некоторого интервала, М — целая переменная. При входе 
через точку ЕМАХ должно возвращаться приближенное максимальное значе- 
ние, которого достигает Е в интервале от А до В. Функция ЕММ используется 
для вычисления минимума. Аппроксимации ЕМАХ и ЕМГМ вычисляются 
путем анализа значений Е в точках А, А-+(В—А)/М,..., В (В—А)/М, В. 
Проверьте работу функции с помощью соответствующей главной программы. и 
нескольких значений вещественных параметров функции. 


2.06. Программа на рис. 2.6 вычисляет по методу трапеций площадь под не- 
которой кривой Е на интервале (А, В). Метод средней точки подобен методу 
трапеций. По этому методу интервал (А, В) делится на М подынтервалов. 
Однако здесь площадь в подынтервале (С, 2) аппроксимируется по формуле 
(0—С)»*Е ((С--0)/2). Напишите программу, которая сравнивает эти методы, 
для функций Х+*3—Х+=2 и Хз ОКТ (Х) в интервале от 2 до 10. В каждом 
случае делите этот интервал на 24 подынтервала. 


2.07. Если машина, на которой вы работаете, отлична от 1ВМ 360-370, посмот- 
рите, годится ли для вашей машины генератор случайных чисел, приведенный 
на рис. 2.10. Если нет, напишите такую программу сами. | 

Замечание. Во многих вычислительных центрах эта программа входит в биб- 
лиотеку Фортрана. 


2.08. Напишите и проверьте подпрограмму К МБЗЕО, которая имеет два целых 
параметра 1$Т и М, где Г. 15Т — это массив размера М.К МОЗЕО исполь- 
зуется в качестве генератора случайных чисел и вырабатывает последователь- 
ность М случайных целых чисел г(1), (2), ..., г(№). Каждое число должно 
находиться в диапазоне от | до М и не должно повторяться. При возврате дан- 
ная подпрограмма должна присваивать значение г(1) элементу 1[.1$Т(1), зна- 
чение 7(2) элементу [Г.1$Т(2) и т. д. Предупреждение. Вследствие того, что 
какие-то числа могут повторяться, в данном примере может понадобиться 
более М обращений к генератору случайных чисел. 


2.09. Метод хеш-таблиц, рассмотренный в разд. 2.4, разрешает коллизии 
посредством техники линейного опробирования. Это не самый лучший метод. 
Метод случайного опробирования генерирует последовательность п—| одиноч- 


ных случайных чисел (1), г(2),..., г(п—1) в диапазоне от | до п—1. При воз- 
никновении коллизии в позиции И(®) мы пытаемся воспользоваться #(®)- 
-НК-Е®- (2), ..., В®)--(и—П. Как и при линейном опробировании, 


хеш-таблица рассматривается как циклическая. Напишите программу, кото- 
рая сравнивает число проб, необходимых при линейном и случайном опроби- 
ровании. Создайте несколько наборов данных для выполнения этого сравне- 
ния. Предложение. Генератор случайных чисел является идеальным средством 
для создания таких тестовых данных. 
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2.10. Предположим, что некоторый программный модуль содержит инструкции 


ТМТЕСЕК 11$Т1(3), МАТВ1Х(2,3) 
АЕА СОЕРР, ЕТСЕМ(2) 
СОММОМ ЕТЗТ, СОЕЕЕ, МАТАТХ, ЕТбЕМ 


Какие переменные и элементы массивов ассоциируются с каждым из 12 слов 
общей области? 


2.11. Рассмотрите приведенный ниже набор инструкций. Укажите, какие 
инструкции правильны, а какие ошибочны. Объясните, почему они ошибочны. 
В правильных инструкциях прокомментируйте возможные побочные эффекты. 


а) ТМТЕСЕВ 3(5}, К». (13,2) 
ВЕДЬ М(30) 
СОММОМ 4» К, № 


' ЕООТУАСЕМСЕ (1(1,17,М(1}) 


Б) ТНТЕбЕВ 4(5), К» (13,2), М(30} 
СОММОмМ у, К, Ё 
ЕОЧТУАКЕМСЕ (К, МСТ) } 


С) ТМТЕСЕВ 415} К» 1413,21, М(30} 
СОММОМ 4, К, Ё 
ЕОМТУАСЕМСЕ (1(1),М(11, (Е(1, 12, МС ВУ 


7 

4) ТНТЕСЕВ 11$7Т{3}, МАТАТХ(2,3)» $1Х(6} , 

‚  ЩКЕАБ СОЕРР, ЕТСЕМ(2), Р1\МЕ( 5) , 
СОММОМ ЕТ$Т, СОЕРЕ, МАТАТХ, ЕТСбЕМ 
ЕЧИТУАСЕМСЕ ($1Х(1),МАТАТХ( 2,2) 1 


е) ТНТЕСЕВ 115143}, МАТАТХ( 2,3)» $1Х(6} 
АЕАС СОЕРЕ, ЕТСЕМ( 2), Е\\УЕЙЗ) 
СОММОМ ЕТЗТ, СОЕЕРЕ, МАТВ1Х, ЕГСЕМ 
ЕСИТУАСЕМСЕ {$1Х(2),ЕТУЕКЗ Я 
ЕООТУАСЕМСЕ {ЕТУЕ(1),СТ$Т( 19) 
ЕЧЧТУАСЕМСЕ ($1Х(1),МАТАТХ(Е 19} 


2.12. Каково содержимое массива А размером 2х2, который распечатывается 
с помощью программы 


ТМТЕСЕВ А{(2,2), Т, 4, АВС» 7, РЕМ ть 
СОММОМ 2 
ЕЦЬ (АВС) = ЕМ(3-АВС) 
71 «0 м 
00 2 Г = 1,2 
00 14 = 1,2 
А(Т»/} = РАК 
СОМТТМОИЕ 
СОМТТМОЕ 
МАЦТЕ (6,20} А 
20 РОАМАТ (1Х,211} 
ЗТОР 
ЕМО 


мы 
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ТМТЕСЕА РУМСТТОМ ЕМ(Р). 
ТМТЕСЕВ Р, 2 

СОММОМ 2 

РЕМ = Р 

ТЕ (2 51Е. Р) АЕТИВМ 
ЕМ = 2 

7 = 7+1 

ВЕТИЕМ 

ЕМО 


2.13. Можно представить план расстояний между городами с помощью массива 
целых величин. Рассмотрим в качестве примера следующий план: 


{род 1 Город 2. Город 5 
® © ® 


250 миль 


Здесь —1 обозначает неизвестное расстояние. Программа считывает вначале 
целое число М (№=5), а затем матрицу РАТН$ целых чисел размером МХМ. 
Далее ваша программа проверяет, является ли РАТН$ правильным представле- 
нием плана (Т. е. проверяет, чтобы РАТНЗ$ (1, )=РАТН$(У,1) для всех значе- 
ний [, ]<М). Если нет, обработка оканчивается. В противном случае все —1 
должны быть заменены на кратчайшие расстояния между соответствующими 
двумя городами. Следует быть осторожным, так как такого пути может и не 
оказаться. В этом случае нужно оставить значение —1. В завершение массив 
РАТН$ должен быть распечатан. 


2.14. Напишите программу управления учетом товаров (инвентаризации). 
Основанная на заранее определенных входных командах программа должна 
обновлять инвентарный файл при новых поступлениях и продаже товаров, 
печатать инвентарный отчет и запросы на товары. Входные данные в программу 
начинаются с набора инвентарных карт, каждая из которых имеет следующую 


форму: 


Колонка Вид данных 

1—9 Номенклатура товара 
11—14 Количество в наличии 
16—19 Проданное количество 
21—27 Оптовая цена 


31—37 Розничная цена 
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Конец инвентарных карт отмечается картой, которая содержит отрицательное 
число в поле номенклатуры. После ввода инвентарных карт следует набор 
управляющих карт, каждая из которых имеет такую структуру: 


Колонка Вид данных 
1 Код протокола 
6—14 Номенклатура товара 
16—19 Количество 
21—27 Оптовая цена 
31—37 Розничная цена 


Здесь код протокола интерпретируется следующим образом. 


Код-1 — Произведена закупка. Файл надо обновить. Если данная номенк- 
латура ранее не появлялась, то нужно добавить ее к списку, отсортированному 
по номерам. Если данная номенклатура уже имеется в списке, можно игнори- 
ровать розничную и оптовую цены, поскольку они должны оставаться постоян- 
ными, т. е. теперь для обновления файлов требуется лишь поле количества 
товара. Распечатайте суммирующее сообщение по закупкам. 

Код-2 — Должна быть произведена продажа. Колонка 21 и все последую- 
щие игнорируются. (Эти колонки должны быть заполнены пробелами.) Про- 
верьте, хватит ли для этой продажи товара. Если нет, то предположите, что 
будет продан весь оставшийся запас этого товара (если он имеется). В любом 
случае нужно соответственно уменьшить имеющееся количество данного то- 
вара и увеличить общее количество проданных товаров. 

Код-3 — Следует распечатать список всех товаров, которые должны быть 
заказаны, потому что их мало в наличии. Критерий: новая партия товара за- 
казывается, если имеющийся запас меньше или равен трем единицам. Пример 
сообщения о необходимых закупках задан форматом ЕОКМАТТ. 

Код-4 — Следует -напечатать полный инвентариый отчет. Пример формы 
инвентарного отчета показан в формате ЕОВМАТ 2. 

Код-5 — Остановить обработку. Замечание. В реальной системе инвента- 
ризации следует предусмотреть вывод текущего инвентарного файла для его 
дальнейшего использования, 


ЕОКМАТ 1 
Запрос на покупку товара 
Номенклатура Имеющееся Общее кол-во ° Оптовая Розничная 
количество проданного цена ‚ цена 
товара товара 
57256 3 10 28.75 38.88 
64031 0 623 14.25 26.99 
ЕОЮКМАТ 2 
Инвентарный отчет 
Номенклатура Имеющееся Общее кол-во Оптовая Розничная 
КОЛИЧЕство проданных цена цена - 
товара товаров 
57256 3 10 28.75 38.99 
57921 542 67 4.75 6.95 
64031 0 623 14.25 26.99 


96021 4 0 425.00 625,00 


Глава К] 


ПРОГРАММИРОВАНИЕ НЕЧИСЛЕННЫХ ЗАДАЧ 


3.1. Литеры в качестве данных 


Язык Фортран был разработан в основном для решения так 
называемых научных задач. По этой причине в языке преду- 
смотрена операция возведения в степень; подпрограммы извле- 
чения квадратного корня и вычисления тригонометрических 
функций поставляются вместе с любым компилятором Фортрана. 
Наряду с этим обработка текстовой информации представляет 
собой одну из важнейших областей применения ЭВМ. Фортран 
не имеет столь мощных средств обработки текстовой информации, 
какие он имеет для вычислений. В этой главе мы объясним ос- 
новы обработки текстов, приведем ряд практических методов, 
которыми пользуются программисты в решении задач, связанных 
с обработкой текстов. Вы можете пользоваться этими средствами 
и разрабатывать свои собственные. 

Прежде всего несколько слов о терминологии. Будем назы- 
вать любой отдельный символ литерой. Литерой считается любая 
буква (от А до 7), цифра (от 0 до 9) или любой из знаков, таких, 
как (),.= и пробел. (Будем представлять пробел буквой Б в тех 
случаях, когда этот символ необходимо явно указать.) Знаки 
часто называют специальными литерами. Устройства ввода и 
вывода, с которыми вы, возможно, знакомы, распознают все 
26 прописных букв латинского алфавита, 10 цифр и некоторое 
число специальных литер. Ряд сложных устройств ввода/вывода 
позволяет использовать строчные буквы, цифровые индексы, 
буквы греческого алфавита и другие специальные литеры для 
различных применений. Последовательность нескольких литер 
называют цепочкой литер или просто цепочкой. Длина цепочки — 
это число литер, которые ее составляют. 


3.2. Кодирование литер 


Необходимо понимать, что вся информация, хранящаяся в 
памяти машины, представлена в виде цепочек битов. При ин- 
терпретации и использовании эти цепочки битов наделяются 
конкретным смыслом. Существует несколько способов коди- 
рования информации в ЭВМ, с помощью которых литера запи- 
сывается в виде последовательности нулей и единиц. Например, 
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цепочка из четырех литер 1020’ кодируется в одном слове ма- 
шины [ВМ 360-370 так: 


11110001 11110000 11110010 11110000 цепочки битов 
р 0’ 2’ ’0’ литеры 


Заметим, что нет явного соответствия между представле- 
нием цепочки цифровых литер и эквивалентного ей целого или 
вещественного числа. (Десятичное целое число 1020 было бы 
представлено на той же самой машине в двоичном коде как 
00000000 00000000 00000011 11111100.) 

Обычно применяют три способа кодирования литер: ВСО 
(двоично-Десятичный код), при котором каждая из 64 различных 
литер представлена 6б-разрядным двоичным кодом; АЗСИ (Аме- 
риканский стандартный код для передачи информации), при 
котором каждая из 128 различных литер выражена 7-разрядным 
двоичным кодом; ЕВСО[С (расширенный двоично-кодированный 
десятичный код для передачи информации), использующий 
8 двоичных разрядов (битов) для представления каждой из 
256 различных литер. Один из этих кодов, возможно, применен 
в той реализации Фортрана, с которой вы работаете. Однако 
программисту, работающему на Фортране, обычно не нужно 
знать, какой метод кодирования принят в машине. Можно 
всегда написать программу, которая будет правильно работать 
при всех трех способах кодирования литер. 

Возьмем два слова, содержащих литеры, и сравним их между 
собой так, как если бы они содержали арифметические (напри- 
мер, целые величины) значения. Таким путем мы установим 
упорядочение литер. При всех трех способах кодирования литер 
целое число, представляющее литеру А, будет меньше, чем число, 
представляющее литеру В, которое в свою очередь меньше числа, 
представляющего литеру 2. Код литеры 0, интерпретируемый 
как целое число, дает значение, меньшее |, которое в свою оче- 
редь меньше, чем значение кода литеры 9. Упорядочение литер 
от наименьшей к наибольшей при рассмотрении их как целых 
чисел, называют алфавитной последовательностью. При сорти- 
ровке данных мы можем использовать то, что благодаря такой 
упорядоченности сохраняется алфавитный порядок литер. Упо- 
рядоченность специальных литер, а также относительный по- 
рядок трех групп литер (специальные литеры, буквы, цифры) 
в различных способах кодирования различаются. Поэтому можно 
писать программы, независимые от методов кодирования литер, 
если в них цепочки литер проверяются только на равенство. 
Проверка специальных литер на неравенство типа «меньше чем» 
делает программу зависимой от принятого варианта кодирования. 

В ряде версий Фортрана нет данных «литерного» типа. Вме- 
сто этого закодированные литеры могут храниться в переменных 
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целого, вещественного или логического типа. Одна переменная 
может вместить несколько закодированных литер; сколько 
именно — зависит от принятого способа кодирования (ВСО, 
АЗСИ или ЕВСОТ) и от длины машинного слова. Например, в 
машинах ВМ 360-370 используется код ЕВСОТС (8 битов на 
литеру), а длина слова составляет 32 бита. Таким образом, в 
одном машинном слове могут быть закодированы четыре литеры. 
В машине РЕС-10 приняты 36-разрядное слово и код АЗСИ (по 
7 битов на литеру); таким образом, в одном слове можно уме- 
стить 5 литер. При этом крайний правый бит или «младший 
разряд» не используется. В машинах Отуас 1100 принят код 
ВСО (6 битов на литеру) и в 36-разрядном машинном слове 
можно уместить 6 литер. 
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Код формата А соответствует преобразованию литерных дан- 
ных из внешней формы во внутреннее представление и обратно 
аналогично тому, как и код [ обозначает преобразование во 
внутреннее представление и обратно целых величин. Код фор- 
мата А записывается как Аш, ш — размер поля. Предположим, 
что с помощью формата Ах передаются данные к (или от) пере- 
менной, в которой может храниться и закодированных литер. 
Если выполняется операция ввода и \=п, закодированные 
литеры занимают & левых позиций переменной, а правые (и— и) 
позиций заполняются пробелами. Если ип, только п правых 
литер входного поля умещаются в переменной. Если выпол- 
няется операция вывода и ш<п, то на вывод передаются рас- 
положенные слева & литер. Если ш>>п, будут переданы все п 
литер, а левые (&—ип) позиций поля вывода заполняются про- 
белами. 

Приведенный ниже пример поясняет эти правила. Предполо- 
жим, что в используемой ЭВМ в одном машинном слове распола- 
гается пять литер. Выполнение следующей пары инструкций 
КЕАО/ЕОКМАТ: 


КЕДР (ТУ 100) 1МСН!, 1МСН2, 1МСНЗ 
100 ЕОВМАТ (АЗ, А5, А8) 
‚° КАРТА С ДАННЫМИ: САТТЕВВАРОСНОЧ$Е 


вызывает присваивание переменным следующих значений: 
ГМСН1: САТЬБ  1ПМСН?2: ДЕВКА  ГПМСНЗ: НОО$Е 


(Результат выполнения показан в виде литер, а не в соответ- 
ствующем двоичном представлении. Пробел отмечается буквой Б.) 
Вывод содержимого указанных переменных по инструкции 
ЕОКМАТ с меткой 101 дает следующий результат: 
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\ЕТЕ (1ООТ, 101), ТУСНИ, ТМСН2, 1МСНЗ 
101 ЕОВМАТ (1Х, 'ООТРОТ==»*’, А4, Аб, А8, '#+’) 


ОПТРИТ=+=САТ 2ЕВЮА НОПЗЕж» 


На практике, чтобы специально не запоминать описанные 
выше правила ввода/вывода литер, мы предлагаем пользоваться 
следующими более удобными рекомендациями: 


1. Если в машине, на которой вы работаете, можно уместить 
в машинном слове п литер, то используйте код формата Аш, 
где и<и. Если при выводе требуются дополнительные пробелы, 
задавайте их с помощью формата Х. 

2. Будьте последовательны: если ввод осуществляется по 
формату Ах, то и вывод следует осуществлять по формату Аш. 
Благодаря этому можно не беспокоиться о числе значащих литер 
и их позициях в переменной. 

3. В различных применениях, там, где это возможно, многие 
программисты выбирают какую-то одну плотность упаковки 
в слове, скажем А4, для всех переменных, которые содержат 
литерные данные. 


3.4. Литерные константы 


Литерные константы могут быть представлены двумя спосо- 
бами. Во-первых, литерная константа может быть задана как 
цепочка литер с предшествующей буквой «Н», перед которой 
указывается длина цепочки (Н не принадлежит цепочке). При 
втором способе цепочка литер заключается в кавычки (апострофы). 
Если кавычка встретилась внутри цепочки литер, она повторя- 
ется дважды (в самой литерной константе останется только 
одна из двух кавычек). Из этих двух методов только первый 
является стандартным. Однако из-за неудобств и ошибок, свя- 
занных с подсчетом литер, в большинстве компиляторов реали- 
зован также и второй способ задания литерных констант. Ниже 
приведено несколько примеров литерных констант и цепочек 
’ литер, которые эти константы представляют: 


КОНСТАНТЫ: ’+’ АНРЕЛ 10Н’ТАШМТ $0 ’’”Т1$ ТОО’ 
ПРЕДСТАВЛЯЮТ: = РЕЛ ‘ТАИТ $0 '’Т1$ ТОО 


В стандарте Фортрана 1966 г. литерные константы были до- 
пустимы только в трех случаях: в инструкциях РАТА, в ин- 
струкции ЕОКМАТ и как параметры подпрограмм. Однако в 
некоторых компиляторах разрешается использовать литерные 
константы и в других случаях. В Фортране 77 ограничения 
были значительно ослаблены (В разд. 3.8 приведена более де- 
тальная информация о работе с литерами в Фортране 77.) 
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3.5. Операции над литерами 


После того как данные были занесены в переменные, над 
этими переменными можно выполнять арифметические и логи- 
ческие операции. Например, если ЗТК1 и ЗТК2 — две целые 
переменные, содержащие литерные данные, то инструкции 


ЗТВ1=$ТЕ2 и 1Е(5ТВ1 .ЕО. $ТЕ?) 


имеют смысл и записаны правильно. Так как код цепочки цифр 
не связан с представлением целого или вещественного числа, 
то инструкции 


$ТВ1=10. » $ТЕ2 или [Е ($ТВ! .ЕО. 10) 


не имеют смысла и не дают ожидаемого результата. Кроме того, 
если одно и то же сочетание битов интерпретировать по-разному 
(как вещественное или как целое значение), то следующее срав- 
нение будет ошибочным: 


|МТЕСЕВ 15ТВ/4Н$АМЕ/ 
ВЕАГ. ВЗТК/4Н$АМЕ/ 
1Е (15ТВ ЕО. В$ТЬ) 


Хотя битовые представления [ЭТК и КВЗТК одинаковы, срав- 
нение будет неправильным, поскольку интерпретация цепочки 
битов как целого числа отличается от ее же интерпретации как 
вещественного числа. 

Опытные программисты хранят все литерные данные в пере- 
менных одного типа. Логическому типу свойственно ограниче- 
ние, так как две логические переменные нельзя сравнить с по- 
мощью операции отношения (‹равно», «меньше чем» и т. д.). 
В большинстве ЭВМ операции над целыми числами (присваи- 
вание, сравнение) могут быть выполнены как минимум с той же 
скоростью, что и над вещественными, но обычно быстрее. Г]о- 
этому мы рекомендуем следующее правило: 


Литеры следует хранить только в переменных одного 
типа, предпочтительно в целых переменных. 
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Вычислительный процесс обычно складывается из ввода 
данных и их обработки. Эти данные иногда целесообразно рас- 
полагать в определенных фиксированных позициях перфокарты, 
однако чаще удобнее располагать их в произвольных позициях. 
Иметь такую возможность особенно ценно для начинающих 
программистов, которые, как правило, даже не представляют себе, 
сколь серьезными могут быть последствия, если данные будут 
отперфорированы со смещением хотя бы на одну колонку. 
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Для преобразования целого числа, введенного по формату Г, 
необходимо выполнить следующие действия: 


1. Найти и проанализировать последовательность литер в 
пределах определенного поля. 

2. Вычислить двоичное значение, эквивалентное целому 
числу, представленному этими литерами. 

3. Присвоить двоичное значение указанной переменной. 


Желательно ослабить первое ограничение, а именно вместо 
того, чтобы считывать литеры из предопределенных колонок 
перфокарты, можно начать чтение с любой указанной програм- 
мистом позиции и использовать первую же непрерывную цепочку 
литер на карте. Заметим, что форматные коды Ги Е в данном 
случае уже будут неподходящими, так как входная величина 
не располагается в фиксированных позициях перфокарты. В этом 
случае нам приходится самим делать большую часть работы, 
которую обычно выполняет форматный процессор, преобразу- 
ющий число, представленное на перфокарте, в эквивалентный 
двоичный код. Фактически перед нами та же задача, которая 
решается при бесформатном вводе/выводе. Вот шаги, которые 
необходимо выполнить: 


1. Найти первую литеру числа, которое нужно преобразо- 
вать (т.е. первую отличную от пробела пробивку на карте). 

2. Найти конец цепочки литер, представляющих преобразу- 
емое число (т. е. найти первую отличную от цифры литеру после 
первой литеры, не являющейся пробелом, или конец карты, 
что встретится раньше). 

3. Вычислить целое значение, представленное этой последо- 
вательностью литер. | 


Первый шаг не представляет трудностей. По существу, это 
последовательный просмотр таблицы; здесь элементы таблицы — 
это колонки вводной перфокарты. Будем искать признак числа — 
знак или цифру. Пробелы игнорируются, пока не будет найдена 
первая литера числа. Просмотр заканчивается неудачно, если 
литера не оказалась ни знаком, ни цифрой или если до конца 
перфокарты не встретилось ни одной литеры, отличной от про- 
бела. В этом случае процесс прекращается и в качестве значения 
числа принимается ноль. 

Второй шаг также легко выполнить. Все, что нужно, это 
проанализировать каждую литеру после первой. При этом могут 
возникнуть следующие три случая: найдена не цифра, достигнут 
конец перфокарты, число найденных цифр больше допустимого. 
В первом случае анализ цепочки литер завершается нормально. 
Положение отличного от цифры разделителя необходимо заме- 
тить для дальнейщего последовательного просмотра карты. 
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Во втором случае мы имеем дело с другой формой нормального 
окончания. Этот факт также следует заметить; он означает, что 
поиск числа на данной перфокарте завершен. В третьем случае 
‚число задано ошибочно. Существует фиксированный, максималь- 
но допустимый размер целого числа. Этот размер различен для 
различных ЭВМ и зависит от длины слова машины. Для пред- 
ставления целых чисел будем пользоваться девятью десятичными 
цифрами, поскольку такие числа можно расположить в одном 
машинном слове в большинстве больших вычислительных машин. 

Третий шаг легко выполнить в две фазы. Во-первых, необхо- 
димо представить каждую цифровую литеру эквивалентным 
двоичным целым и, во-вторых, объединить отдельные двоичные 
целые в одно число. Первая фаза просто добавляется к про- 
смотру таблицы: литере «О» ставим в соответствие число 0; ли- 
тере «1» — целое | и т. д. Заметим, что так как литера «1» и 
целое | имеют разные представления внутри машины, то необ- 
ходимо самим позаботиться о соответствии. (Существует взаимо- 
связь между представлениями, но она зависит от машины.) 

Соответствие между литерой и целым может быть получено 
с помощью двумерного массива, один столбец которого содержит 
цифру в форме литеры от '’0’ до '’9’, второй — соответствующее 
литере целое число. 


Литера Представление 


'0’ 0 
"1' | 
5; д 


Заметим, что каждое значение во втором столбце этой таблицы 
соответствует порядковому номеру строки минус 1. аким об- 
разом, второй столбец не нужен, поскольку его элементы можно 
легко вычислить: достаточно вычесть | из соответствующего 
значения индекса. В приведенной ниже программе будет исполь- 
зован этот способ. 

Теперь рассмотрим вторую фазу последнего шага, т. е. объ- 
единение целых чисел, соответствующих цифрам некоторого 


числа. Пусть число представлено цепочкой литер С1 С2... Сп, 
и пусть Й, {2,..., м будут целые числа, соответствующие ли- 
терам С1, С2,..., Сп. Значение этой цепочки равно 


+1011 100=й_,-... + 107-22 + 109-18. 


Его можно вычислить справа налево умножением очередного 
:, на соответствующую степень 109. Более удобная форма записи 
для вычисления этой формулы | 


Г-н 10-8... Е 10,1. А, 
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или, после перегруппировки умножений, 
((...(((1.) = 10-1.) = 10-4)... «Ю-ь-) = Ю-Ь,. 


Вычисление последней формулы может быть организовано 
в цикле: 


1. ТЕРМ=0; 
2. РО=ИНДЕКС=1 до №: 
ТЕВМ=ТЕВМ=10- 1 (ИНДЕКС) 


Этот алгоритм имеет несколько преимуществ перед приве- 
денным выше. 


1. Цифры просматриваются слева направо, что делает про- 
грамму более понятной. 

2. Нет необходимости производить предварительный про- 
смотр данных для определения правого конца цепочки цифр. 

3. Требуется выполнить только п умножений, в то время 
как в предыдущей формуле для вычисления каждого множителя 
10+» требуется до К умножений или возведений в степень (в 
зависимости от выбранного метода). В свою очередь множитель 
10*+*Р затем необходимо умножить на 1(^). Таким образом, как 
минимум требуется 2«п умножений или возведений в степень. 
Обе эти операции требуют машинного времени, и от них следует 
попытаться избавиться. 


Все это не пустые хлопоты. В гл. 1 было показано, что с 
точки зрения эффективности лучше выбрать хороший алгоритм 
и реализовать его в незамысловатой манере, чем пытаться ком- 
пенсировать недостатки алгоритма хитроумными приемами. 
Программа, реализующая только что описанный алгоритм, при- 
ведена на рис. 3.1[. 

Эта программа не требует подробного обсуждения, так как 
она просто отражает уже принятые нами решения на уровне ал- 
горитма. Заметим только, что единственное указание о том, что 
длина записи равна 80, содержится в первой инструкции ини- 
циализации данных. Во всех последующих инструкциях исполь- 
зуется значение переменной ЕМОСОГ.. Если позже потребуются 
записи, занимающие только первые 72 колонки на перфокарте, 
будет легко внести изменение в программу. При этом не потре- 
буется просматривать всю программу в поисках инструкций, 
содержащих число 80, или возиться с отладкой, если один раз 
это число было упущено. Значение последней колонки можно 
также передавать как значение параметра. Заметим, что поиск 
чисел проводится в отдельной подпрограмме РЕПМО. Отчасти 
это сделано для большей наглядности, отчасти — потому, что 
этот модуль может быть использован еще где-либо. Сформули- 
руем общие требования, предъявляемые к написанию программы: 


ОООООСОПООСОООЗОООООООООООвоовооооовоооооооо 


$9ВЮКООТИМЕ ЕОСНИМ (САЮО, СОГ, МТ, ЕВЕГАОС) 
* * ЕОСНП\: * *х ПРЕОБРАЗОВАНИЕ ЛИТЕР В ЦЕЛЫЕ * * * ** жж жх + $ 


ВХОД: 


САКО: 


СОГ:: 


Выход: 


СОГ: 


С. 
ЕКЕГАС: 


МЕТОД: 


МАССИВ ИЗ 80 ЛИТЕР, ПРЕДСТАВЛЯЮЩИХ КОЛОНКИ ПЕР- 
ФОКАРТЫ (ПО ОДНОЙ ЛИТЕРЕ НА ЭЛЕМЕНТ); 

ПОЗИЦИЯ ВНУТРИ «САКО», С КОТОРОЙ НАЧИНАЕТСЯ ПОИСК 
ЦЕПОЧКИ ЦИФР. 


ПОЗИЦИЯ ВНУТРИ «САКО» НА КОТОРОЙ ПРЕКРАТИЛСЯ 

ДАЛЬНЕЙШИЙ ПОИСК ЦИФР; 

СОТ. =81; ЕСЛИ НЕ НАЙДЕН СИМВОЛ, ОТЛИЧНЫЙ ОТ ЦИФРЫ, 

ПРЕКРАТИТЬ ПОИСК ПОСЛЕ АНАЛИЗА 80-Й КОЛОНКИ; 

Са ПОЗИЦИЯ ЛИТЕРЫ ПОСЛЕ ПОСЛЕДНЕЙ НАЙДЕННОЙ 
РЫ; 

ДВОИЧНОЕ ЗНАЧЕНИЕ, ЭКВИВАЛЕНТНОЕ НАЙДЕННОЙ ЦЕ- 

ПОЧКЕ ЦИФР; 

1МТ=0, ЕСЛИ НЕ ВСТРЕТИЛОСЬ ЦИФРЫ ДО ПЕРВОЙ НЕДОЗ- 

ВОЛЕННОЙ ЛИТЕРЫ; 

[МТ =ЗНАЧЕНИЕ, СООТВЕТСТВУЮЩЕЕ ПЕРВЫМ ДЕВЯТИ 

ЦИФРАМ, ЕСЛИ НАЙДЕНА ЦЕПОЧКА ДЛИНЕЕ ДЕВЯТИ ЦИФР; 

[МТ=ЦЕЛОЕ ЧИСЛО. ЕСЛИ НАЙДЕНА ВЕРНАЯ ЦЕПОЧКА; 

ФЛАГ, СИГНАЛИЗИРУЮЩИЙ ОБ ОШИБКЕ; 

ЕВЕРЕАС=р— 1, ЕСЛИ НЕ НАЙДЕНО НИ ОДНОЙ ЦИФРЫ; 

ЕВРГАС=0. ЕСЛИ ЦЕЛОЕ НАЙДЕНО И ПРЕОБРАЗОВАНО; 

ЕВЕГАС=+1, ЕСЛИ НАЙДЕНО БОЛЕЕ 9 ДЕСЯТИЧНЫХ ЦИФР. 


АНАЛИЗИРУЕТСЯ ЭЛЕМЕНТ ЗА ЭЛЕМЕНТОМ МАССИВА. ПРИ ЭТОМ 


ИЩУТС 
А. 

В. 

С. 

р. 


*` один ИЛИ БОЛЕЕ ПРОБЕЛОВ, КОТОРЫЕ ИГНОРИРУЮТСЯ; 
ЗНАК (+ ИЛИ —), КОТОРЫЙ СЛУЖИТ ЗНАКОМ РЕЗУЛЬТИРУ- 
ЮЩЕГО ЦЕЛОГО ЧИСЛА; 

ЦИФРА, С КОТОРОЙ НАЧИНАЕТСЯ ПОИСК НЕПРЕРЫВНОЙ ЦЕ- 
ПОЧКИ ЦРФР; 

НЕДОЗВОЛЕННАЯ ЛИТЕРА, ОСТАНАВЛИВАЮЩАЯ ВЫПОЛНЕ- 
НИЕ ПОДПРОГРАММЫ. 


КАК ТОЛЬКО НАЙДЕНА ПЕРВАЯ ЦИФРА, ЗА НЕЙ ДОЛЖНЫ СЛЕДОВАТЬ 


ОСТАЛЬНЫЕ ЦИФРЫ; ПРОБЕЛЫ И ЗНАКИ НЕ РАЗРЕШАЮТСЯ. 
ИСПОЛЬЗУЕТСЯ МАКСИМАЛЬНО 9 ЦИФР. 


ПРОГРАММИСТ: ——— ДАТА: ——— 


ТИТЕСЕВ САКО(80), СО, 1МТ , ЕМОСОЕ ‚ ЕВЕЕАС 

ТМТЕСЕВ Р15$,М1МИ$ , ВЕАМК, $ТбМ, ЕМО ,ОЕТМО 

ОАТА РЬШ$/ 1+! /, ММУ / 1" /,ВЬАМКИ '/,ЕМОСОЕ и ОД 
$16М=+1. 

ЕЯРЬАС=-Т 


УНТ=0 
ДОПУСТИМО ЛИ ‘НАЧАЛЬНОЕ ЗНАЧЕНИЕ С0Е2 
1: 4С06 „СТ. ЕМОСОЬ) 60 ТО 99 


НАЧАЛО ПОИСКА ПЕРВОЙ ЦИФРЫ 
10 РО 20 Т=СО, ЕМОСОЕ 


12 (САВО(Т) «ЕЯ. №105) 60 ТО 30 
1-Е (СААО(Т) „ЕЯ, РЁЦ$) 60 ТО 35 


{САРО(Т) „МЕ. ВЕАМК) СО ТО 40 


ЕСЛИ НЕ ПРОБЕЛ НЛИ ЗНАК» ТО ИЛИ ЦИФРА 
ИЛИ НЕВЕРНАЯ ЛИТЕРА» РЕШИМ ПОЗДНЕЕ 
20 СОМТТМИЕ 
ЕСЛИ ВЫШЛИ СЮДА, ВСЕ КОЛОНКИ БЫЛИ ЗАПОЛНЕНЫ ПРОБЕЛАМИ» 


ВОЗВРАТ ПО ОШИБКЕ 


СО = ЕМОСОЕ+1 


АЕТУАН 


ЗДЕСЬ ОБНАРУЖЕН ЗНАК, МИНУС 
30 5151 с, ОБНАРУЖЕН ЗНАК ПЛЮС ИЛИ МИНУС. 
ЗДЕСЬ © 
ИИ ПЛЮС. „.5ТСМ“° НА ВХОДЕ БЫЛ УСТАНОВЛЕН ПРАВИЛЬНО 
В ПЮбОМ СЛУЧАЕ ЛЕРЕЙТИ К СЛЕДУЮЩЕЙ КОЛОНКЕ, 


22 т УБЕ ДИМСЯ 5 что в ПОСЛЕДНЕЙ КОЛОНКЕ НЕТ ЗНАКА 


Рис. 3.1. Процедура преобразования литер в целые числа. 


6* 


1 Ц «СТ. ЕМОСОЕУ ВЕТОАМ 


НАЧАЛО ПОИСКА ЦЕПОЧКИ ЦИФР (НЕ БОЛЕЕ 9) 
40 ЕМО к МТМО (ЕМОСОЕ» 1+8} 
00 50 }=Т,ЕМО 
вызов ФУНКЦИИ ПОИСКА. ОНА ВОЗВРАЩАЕТ 
ЦЕЛЫЕ ОТ 0 ДО 9. ЕСЛИ ЦИФРА НАЙДЕНА, 
И -1. ЕСЛИ НАИДЕНА НЕ-ЦИФРА 
М = ОРТМО (САВО(1)) 
ЕСЛИ НЕ-ЦИФРА. ОСТАНОВ $ ИНАЧЕ ЗАПОМНИТЬ ЗНАЧЕНИЕ, 
И ПРОДОЛЖАТЬ ОБРАБОТКУ 
ТЕ (М -4Т. 0) 60 ТО 60 
ТМТ = 10% МТ + М 
ЕВЕКАб=0 
50 СОМТТМИЕ ^ 


пя 


яп под 


с 
с ЕСЛИ ВЫШЛИ СЮДА. ТО НАЙДЕН КОНЕЦ КАРТЫ ИЛИ 9 ЦИФР® 
С ПЕРЕДВИНУТЬСЯ К НЕ- ЦИФРЕ ИЛИ КОНЦУ КАРТЫ 
17 (ЕМО „АТ. ЕМОСОЕ\ С0 ТО 55 
С СЛУЧАИ 1. КОНЕЦ, КАРТЫ, ОСТАНОВ 
3 = ЕМОС 0+2 
60 ТО 69 


ЕСЛИ (ЕМО „(Т.. ЕМОСОС У | 
| СЛУЧАЙ 2: 9 ЦИФР ПРЕОБРАЗОВАНЫ * НАХОДИМ СЛЕД. НЕ-ЦИФРУ 
55 ЕМО = ЕМО+1 
3 = ЕО 
с ЕСЛИ ДЕСЯТАЯ ЛИТЕРА НЕ-ЦИФРА, ЦЕПОЧКА ПРИЕМЛЕМА, 
ТЕ (ОЕТМО(САВО( 1) „ЕС. —1} 60 ТО 60 
ЕВЕГАС- + 1. 
О 58 / = ЕНО,ЕМОСОЕ 
1Е (ОЕТМО(САВО (41) „ЕТ, 01 60 Т0 60 
58 СОМТТМИЕ 
с ВЫШЛИ НА КОНЕЦ КАРТЫ 
3 = Е№60(+1 


С ВОЗВРАЩЕНИЕ ВЫЧИСЛЕННОГО ЦЕЛОГО ЗНАЧЕНИЯ 
$0 ТМТ = 1№1%$16М 
=) 


НЕВЕРНОЕ ЗНАЧЕНИЕ СО’; ВОЗВРАЩАЕМ @ И 
СОЕ = К АЗТ-САВр-СОсОММ + 1 | 


пав 


0 
СОЁ = ЕМОСО +1 
ЕКЕСАС = -1 


ТАТЕСЕК РОМСТТОМ ОЕТМО (СНАВ] 


ПРИНИМАЕТ НА ВХОДЕ ОДИНОЧНУЮ ПИТЕРУ, ОПРЕДЕЛЯЕТ» 

ЦИФРА ПИ ЭТО И ВОЗВРАЩАЕТ ЦЕЛОЕ 

ЭКВИВАЛЕНТНОЕ ЭТОЙ ЦИФРОВОЙ ЛИТЕРЕ. 

ЕСЛИ ЛИТЕРА ОТЛИЧНА ОТ ЦИФРЫ, ПОДПРОГРАММА ВОЗВРАЩАЕТ -1 
ЕЙСТВИЕ — ПОИСК В ТАБЛИЦЕ „.ОТСТТ““. , 

ПИТЕРЕ '0’ СООТВ. 1-ЫЙ ЭЛЕМ. ТАБЛИЦЫ, ЛИТЕРЕ \1' = 2-0И ИТ.Д. 

ЕСЛИ ДЛЯ ЛИТЕРЫ ЕСТЬ ЭЛЕМЕНТ В ТАБЛИЦЕ, 

ЕЕ ЦЕЛОЕ ЗНАЧЕНИЕ НА 4 БОЛЬШЕ. 

ЧЕМ ЕЕ ПОЗИЦИЯ В ТАБЛИЦЕ 


обоовоо<овоя 


ТНТЕСЕВ СНАЮ, ОТС1Т (10) 

ОАТА ОТОТТИ"О "1,29 Зе бей 7 уве 
ВНАЧАЛЕ БЕРЕМ ЗНАЧЕНИЕ ПО УМОЛЧАНИЮ 

РЕ1№ = —1 


ПОИСК ЛИТЕРЫ $ | 
ЕСПИ НАЙДЕНА, ВАМЕТИМ ЕЕ ПОЗИЦИЮ 
90 190 Т=1, 10 
ТЕ 4СНАВ „ЕЯ. ОТСТ(Т)} ОЕ1М№О = 1-Ё ^ 
1С СОМТТМИЕ 
ВЕТИАМ 
БО 


поо о. 


Продолжение Рис. 3.1. 
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1. Программируя, в пределах разумного стремитесь к общ- 
ности (не делайте, однако, фетиша из структуры и эффективности). 


2. Планируйте возможные модификации программы. Преду- 
смотрите вероятные изменения в программе так, чтобы вы или 
еще кто-либо мог произвести эти изменения. Выделите в отдель- 
ные модули те части, которые могут быть использованы в каких-то 
других программах. 


3.7. Другие методы работы с литерами. 


В этом разделе мы. рассмотрим методы выполнения более 
сложных операций над литерами. Для простоты будем считать, 
что в машинном слове располагается одна литера. В первую 
очередь проанализируем операции конкатенации (объединения 
двух цепочек литер) и поиска подцепочек. 

Для представления цепочки литер используется одномерный, 
а для массива цепочек — двумерный массив. Предположим, что, 
мы имеем дело с массивом, содержащим не более 200 имен, каж- 
дое длиной не более 25 литер. Тогда выделить память под эти 
литеры можно посредством декларации. 


УТЕСЕВ МАМЕ (25, 200) 


Заметим, что в большинстве случаев не имеет значения, как 
задать массив: 25%200 или 20025. Однако, учитывая, что в 
Фортране массивы хранятся по столбцам и большинство обра- 
щений к массиву происходит одновременно по всем литерам 
одного имени, целесообразно хранить литеры в такой последо- 
вательности, чтобы доступ к ним был удобным. Поэтому форму, 
примененную в приведенной выше инструкции, следует предпо- 
честь. 

Чтобы прочитать М-е имя при заданном значении М, выполним 
инструкцию | 


ВЕАР (—,—) (МАМЕ(1, №=1,95) 


Аналогично, чтобы проверить, являются ли К-еи (К-Е1)-е имена 
одинаковыми, выполним инструкции 


00 50 4 = 1,25 


ТР (МАМЕ(,К) „МЕ. МАМЕ), К+1)) 60 ТО 400 
50 СОМТУМИЕ 


ИМЕНА СОВПАДАЮТ, ЕСЛИ ЦИКЛ 
с ЗАВЕРШИЛСЯ НОРМАЛЬНО 


Процесс конкатенации не такой уж простой. Чтобы объеди- 
нить две цепочки литер, необходимо иметь достаточно большой 
массив, в котором могли бы разместиться обе цепочки, и затем 
нужно переслать их в этот массив так, чтобы в массиве они ока- 
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зались рядом. Пересылка должна выполняться поэлементно. 
Предположим, что требуется конкатенировать две цепочки литер 
ЗТВА и ЗТВВ. Длины цепочек ЗТКА и ЗТВВ хранятся в пере- 
менных ГЕМА и ГЕМВ соответственно. Если цепочка, получен- 
ная в результате их конкатенации, должна храниться в массиве 
ТКС, а ее длина — в переменной [ЕМС, то для конкатенации 
цепочек можно выполнить следующий фрагмент программы: 


ТЕ (ЕЕМА) 99» 20, 11 
ОЩИБКА, НЕТ АТВ НОРМАЛЬНО 
31 род 15 Т= 1, ЁЕМ 
$ТАС(Т) = КАСТ 
15 СОМТТМОЕ 
20 1Е ИЦ.ЕМВ) 99, 40, 21 
С ОЩИБКА, НЕТ ЗТВВ. НОРМАЛЬНО: 
21, р 25 ТТ =}, БЕМВ 
$ТАС(Т+ЬЕМА) = $ТАВ(Т) 
25 СОМТТМУЕ 
40 ЕМС = ТЕМА + СЕМВ 


фоФ 


С ОШИБКА: ГЕМА<0 ИЛИ -ЕМВ<0 
99 чзеь 


Важным является значение длины, хранящееся в памяти вместе 
с каждой цепочкой литер. Длина должна быть обязательно 
целой переменной точно так же, как и элементы цепочки литер. 
Для удобства отладки и Локализации обращений к памяти в 
процессе выполнения длину цепочки можно хранить в первом 
элементе массива, а сами литеры расположить во втором и по- 
следующих элементах. Так, цепочка литер ’НЕГГО”’ длиной 5 
может быть представлена в целом массиве А из 6 элементов: 


5 | 'Н’ | 'Е’ | '].’ | о | 


Заметим, что для наглядности программы может оказаться 
желательным использовать различные имена для задания самой 
цепочки литер и ее длины, как ЗТКА и ГЕМА в приведенном 
выше примере. Это удобно сделать с помощью инструкции 
ВООТУАНЕМСЕ следующим образом: 


ТМТЕСЕВ А(101}» ЧЕМА» ЗТВА(100} 
ЕСО1УАСЕМСЕ {А(1} ,ЪЕМА), 4А(2).5ТВА{11) 


При такой организации легко выполняется отладка про- 
граммы, поскольку вся информация о цепочке «А» содержится 
в одном наборе ячеек памяти, которые могут быть выведены в 
виде дампа посредством одной инструкции. 
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Другим важным средством при работе с литерами являются 
операции над подцепочками. Подцепочка — это любая непре- 
рывная часть цепочки, включая саму цепочку. Одной из типич- 
ных задач при работе с литерами может быть поиск определенного 
вида подцепочек, например только пробелов или наибольшей 
подцепочки, которая не содержит литеру «?». Алгоритм решения 
таких задач довольно очевиден, и далее мы его не обсуждаем. 

Рассмотрим теперь такие действия с подцепочками, как 
присваивание (присваивание переменной определенной подце- 
почки другой переменной) и замещение (замена одной подцепочки 
переменной на другую). Метод выполнения операции замещения 
будет проиллюстрирован в примере, приведенном в конце дан- 
ной главы. Здесь же мы рассмотрим, как одной переменной 
присвоить подцепочку другой переменной. 

Подцепочки обычно определяют так: подцепочка цепочки Х, 
начинающаяся с литеры [, длиной ] литер с соответствующими 
значениями [и У. Предположим, что цепочки литер являются 
массивами, имеют переменную длину и состоят из последова- 
тельности элементов, каждый из которых содержит одну литеру. 
Наша задача — присвоить цепочке РЕ$Т подцепочку цепочки 
ЗОЧКСЕ, начиная с позиции РО$ длиной, заданной в перемен- 
ной ЗОВЕЕМ. Будем полагать, что длины цепочек ОЕЗТ и 
ЗОЧЦКВСЕ указаны в переменных ОЗТЕЕМ и $ВСЁГЕМ соответ- 
ственно. Это можно сделать с помощью следующего набора 
инструкций: 


ТЕ((Р0$+3УВЬЕМ-1} „СТ» $ЗАСЬЕМ? 60 ТО 999 
С ОЩИБКА; ЦЕПОЧКА КОРОЧЕ. ТРЕБУЕМОЙ ПОДЦЕПОЧКИ 


00 10 1=1,50ВЕЕМ 


ОЕЗТ(Т} = ЗО9АСЕ(РОЗ+Т-19 
10 СОМТТМИЕ 


ОЗТЬЕМ = ЗУВЕЕМ 


Программы, в которых для хранения одной литеры отво- 
дится переменная целого типа, имеют одно очевидное достоин- 
ство: такие программы правильно выполняются на любых ЭВМ, 
в которых допускается как минимум полный стандарт Фортрана 
АМ$ 1966 г. Кроме того, можно использовать любую легко до- 
ступную машину при отладке программ, предназначенных для 
малой ЭВМ, доступ к которой ограничен. Можно также писать 
программы, предназначенные для распространения среди поль- 
зователей на различных ЭВМ. Этим преимуществом обладают 
немногие другие языки. Однако, как мы увидим в следующем 
разделе, такой метод сопряжен с довольно громоздким програм- 
мированием. 
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3.8. Данные литерного типа в языках \АТНУ 
и Фортран 77 


Рассмотренные нами в предыдущем разделе методы работы с 
литерами требуют большого количества инструкций для вывол- 
нения довольно простых операций. Только для того, чтобы пере- 
слать цепочку литер, необходимо организовать цикл и выполнить 
много ссылок на переменные с индексами. Простые и наглядные 
сравнения (например, [Е (Х -ЕФ. 'НОЧЗЕ”)) или присваивания 
(У=’'АГРНА’) недопустимы. В историческом плане эти обстоя- 
тельства понятны, так как в начальном проекте языка Фортран 
средства работы с литерами не были предусмотрены. Компи- 
ляторы, допускающие лишь те немногие возможности обработки 
литер, которые были описаны выше, в течение какого-то времени 
все еще будут общепринятыми, и, чтобы программы были пор- 
тативными, приходится ограничивать средства работы с литерами. 
Однако уже и сейчас есть компиляторы, которые располагают 
средствами для более естественной работы с литерами. Среди та- 
ких компиляторов одним ‘из наиболее распространенных явля- 
ется учебно-ориентированный компилятор \МАТЕГУ Универси- 
тета Ватерлоо. Действительно, средства обработки литер этого 
компилятора настолько разумны, что они практически без из- 
менения были перенесены в Фортран 77. В компиляторе \/АТЕТУ 
добавлены литерные данные типа СНАКАСТЕК. Посредством 
декларации СНАКАСТЕЮ цепочки литер могут быть описаны 
аналогично тому, как целые или вещественные числа объявля- 
ются в декларациях 1МТЕСДЕВ или ВЕАГ.. Декларация СНАКА- 
СТЕК указывает, что определенные переменные являются пере- 
менными литерного типа. Она позволяет также указать длину 
каждой переменной. Длина задается с помощью константы, ко- 
торой предшествует +. Длина указывается вслед за словом СНА- 
КАСТЕВ (в этом случае она относится ко всем переменным, со- 
держащимся в данной инструкции) или после имени переменной 
(и тогда она относится только к данной переменной, т. е. пере: 
крывает длину, заданную после слова СНАКАСТЕК). Если в 
декларации СНАЮАСТЕК длина не задана, она полагается рав: 
ной 1. Примеры описания литерных переменных приведены ниже: 


СНАРАСТЕЙ*5 $1861, $1Аб2 . 
СНАЯАСТЕВ МАМЕ*20, А00А*ж30, С1ТУЖ23, ЗТАТЕЖ2: 21Р#5 


СНАВАСТЕК БЕТА, АЁБРН*26, 01617 


В первом примере декларируются две литерные переменные 
длиной по 5 литер каждая. Во втором примере декларируется 
5 переменных, каждая из которых содержит соответственно 20, 
30, 23, 2 и 5 литер. В последней декларации переменные ГЕТК 
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и ОГ@Т содержат по одной литере, а переменная АЕГРН — 26 
литер. 

Аналогично, как и в случае численных массивов, могут быть 
объявлены массивы литерных переменных. Например, в следую- 
щей декларации объявляется массив МАМЕ из 100 элементов, где 
каждый элемент представляет собой цепочку из 20 литер: 


СНАВАСТЕВ+20 МАМЕ (100) 


3.8.1. Литерные константы 


При рассмотрении литерных данных естественно возникает 
вопрос о литерных константах и операциях над ними. Опреде- 
ление литерных констант было дано выше — это цепочка литер, 
заключенная в апострофы. Литера «апостроф» в такой цепочке 
представляется двумя последовательными апострофами. В от- 
личие от ранее рассмотренных возможностей компилятор У/А- 
ТЕТУ позволяет задавать литерные константы и другим образом. 
Как и раньше, литерная константа может встретиться в инструк- 
ции РКОВМАТ, в инструкции присваивания начальных значе- 
ний ОАТА, в качестве параметра подпрограммы. Кроме того, 
литерная константа может выступать в качестве правой части 
инструкции присваивания. Она может быть также операндом для 
операции отношения в логической инструкции 1Е. Таким обра- 
зом, в компиляторе \/АТЕТУ инструкции типа [Е (ЗТВЕ.ГТ. А’) 
и ЭГВ2=’АВС’ допустимы. 

Как и ранее, значение цепочки литер отличается от значения 
целой или вещественной константы или имени переменной. Так, 
инструкции вида [Е ('500’.ЕО. 500) или А=’А--Г могут быть 
синтаксически допустимы для некоторых компиляторов, но их 
смысл отличается от того, что может показаться с первого взгляда. 

Переменная, описанная в декларации СНАКАСТЕК&и, в 
качестве значения будет иметь цепочку ровно из п литер. (Если 
переменной не присвоено значения, то оно, естественно, не пред- 
сказуемо.) | 

Если переменной, описанной в инструкции СНАКАСТЕК»и, 
присваивается значение, длина которого и, то будут использова- 
ны только п левых литер. Если в значении переменной литер 
меньше, чем и, то оставшиеся правые позиции переменной за- 
полняются пробелами. Это же правило распространяется и на 
константы. Пусть ЗТК4А и ЗТК4В — переменные, описанные 
как СНАВАСТЕЮ»4. Тогда каждая из инструкций 


ТАЗА = *АВСОЕЕВ $ТА4В = *Х\2 1 
ЗТА4А = 'АВСО* $1848 = "ХУ 1 


присваивает переменным ЭТКАА ( соответственно 5ТКАВ) одина- 
ковые значения. 
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При операции сравнения более короткий операнд дополняется 
справа пробелами до длины более длинного операнда. 
Переменная типа СНАКАСТЕЮ»п представляет собой не- 
разделимый блок из п литер. В результате выполнения операции 
присваивания происходит замещение, а при выполнении опера- 
ции сравнения — сопоставление всех п литер (включая пробелы, 
добавленные для Удлиннения короткого операнда). Для анализа 
или изменения одиночной литеры из переменной типа СНАЮВА- 
ЕЯ можно также использовать инструкцию ЕОЛУАГЕМ- 
Рассмотрим переменную СГТУ типа СНАВАСТЕВЮ»х20, пред- 
ставляющую собой блок из 20 литер, используемый при сорти- 
ровке в алфавитном порядке. Предположим, что мы задались 
целью напечатать название города, т. е. только значащую часть 
цепочки СГТУ, игнорируя пробелы справа, дополняющие ее до 
20 литер. Обнаружить, где заканчиваются отличные от пробелов 
литеры цепочки, можно с помощью следующего набора инструк- 
ЦИЙ: 
СНАРАСТЕКЖ20 С1ТУ 
СНАВАСТЕВЖ1 (1(20) 
ЕСУТУАБЕМСЕ «С1ТУ, С1(1)3 
00 10 Г =Т» 20 
ЗЕ (01421-13 МЕ» ® 1) 60 10 20 


" 30 СОМТИУЕ 
с ты ОШИБКА ЦЕПОЧКА СОСТОИТ ИЗ ПРОБЕЛОВ 


с чье НАЙДЕНА ПОСЛЕДНЯЯ ЛИТЕРА“„НЕ РоБЕЛе 
ОВК = ЕЕ А—яНЕ П 


Таким образом мы можем узнать точную длину значащей 
части переменной СГТУ (в данном случае названия города; 
СТУ — это город). В данном примере используется инструкция 
эквивалентности, которая позволяет установить начало пере- 
менных СТТУ и С] в одну и ту же точку памяти; 

(1) переменная СТТУ занимает 20 последовательных литер 
(байтов) в памяти; 

(2) переменная С! представляет массив из 20 элементов; 
каждому элементу отводится один байт. 

Ясно, что, поскольку переменные ЦТУ и С1 ассоциированы 
с одним и тем же адресом памяти, значение одной переменной 
является значением другой переменной. Однако каждый эле- 
мент массива типа СНАКАСТЕЮ*| представляет собой одиноч- 
ную литеру из цепочки ТУ. Таким образом, мы получаем 
сразу две прекрасные возможности: можем обрабатывать одно- 
временно 20 литер под именем СТТУ и оперировать с любой оди- 
ночной литерой из этой цепочки как с элементом массива (1. 
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3.9. Примеры 


Мы завершаем эту главу двумя служебными программами. 
Первую программу можно использовать для создания ‘докумен- 
та, описывающего каждый отдельный модуль программы. Вто- 
рую — для преобразования исходного текста программы так, 
чтобы яснее была видна последовательность действий. Вторая 
программа будет выполнять такие функции, как выделение (с по- 
мощью отступа) тел ОО-циклов и изменение имен переменных. 
Обе программы широко применяют средства работы с литерами. 

В первом примере мы построим программу, которая создает 
документ, описывающий логику работы других программ (Рго- 
огат [051с Мапиа| — РЕМ). Назначение и содержание такого 
_ документа мы объяснили в гл. 1. Для каждого модуля программы 
будет построена секция, содержащая описание этого модуля: 
назначение модуля (в общих чертах), его алгоритм; используе- 
мые имена, параметры и наиболее важные переменные; условия 
входа и выхода; имена модулей, вызываемых данным модулем, 
и имена модулей, вызывающих данный модуль. 

В полном объеме эту информацию невозможно «выудить» из 
программы. Однако точно такую информацию, мы обычно описы- 
ваем в начале каждого модуля в «шапках» с комментариями. 
Такая информация составляет важную часть исходного текста 
программы, она полезна при отладке и работе с программой. 
Кроме того, в такой форме комментарии легко найти при анализе 
программы. Мы разработаем программу, которая принимает 
исходный текст другой программы и выуживает из него коммен- 
тарии для построения документа РТМ. 

Прежде всего нам необходимо выбрать форму, которую долж- 
ны иметь «шапки» с комментариями. Нужно выбрать только те 
комментарии, которые действительно содержат описание модуля. 
Эта форма, конечно, произвольна, поэтому можно принять, 
например, такую форму: 

С *х + ИМЯ (ПАРАМ1, ПАРАМ2, ..., ПАРАММ) жж жж на 
С ПОДПРОГРАММА «ИМЯ» 

С УСЛОВИЯ ВХОДА... 

С УСЛОВИЯ ВЫХОДА... ИТ. Д. 


ту хх 


В первой строке ИМЯ — это имя модуля, а ПАРАМ — симво- 
лические параметры. В том случае, если данный модуль пред- 
ставляет собой главную программу, первая строка будет запол- 
нена чередующимися звездочками и пробелами. В колонке 71 
будет пробита буква М (начало главной программы), $ (начало 
подпрограммы) или Е (точка входа в подпрограмму). Блок с 
комментариями будет оканчиваться строкой такого вида: С *х 
в колонках с 1 по би буквой Е (финиш) в колонке 71. 
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ры 


Прочитать перфокарту. Если перфокарт больше не оста- 

лось, останов. | 

В колонках с |1 по 6 'С хх’? Нет, перейти к шагу 1. 

В колонке 72 буква Е’? Да, перейти к шагу [. 

Заменить имя на содержимое колонок с 7 по 12. 

В колонке 72 буква 'М’? Если да, то присвоить имени 

значение 'М/РКОС’. 

В колонке 72 буква 'М’, '’5’ или на текущей странице 

осталось менее 5 строк? Если да, перейти на новую стра- 

ниЦу. 

7. Распечатать колонки перфокарты с 1 по 72, заменяя 
содержимое первой и 72-й колонок пробелами. 

8$. Поочитать перфокарту; если карт не осталось, останов. 

9. Колонки с 1 по 6 содержат °С + х’? Да, перейти к шагу 1. 
Нет, осталась ли на текущей странице еще хотя бы одна 
строка? Нет, перейти на новую_страницу. 

10. Колонка |=’ ‚ колонка 72=’°”, 

11. Перейти к шагу 7. 


о лом 


Заметим, что в рассмотренной схеме модуля широко исполь- 
зуются конструкции 1Е-ТНЕМ, Е-ТНЕМ-ЕЁЗЕ. Мы выделим 
секцию вывода в отдельную подпрограмму. По двум причинам. 
Прежде всего потому, что модуль вывода можно написать сна- 
чала в тривиальной форме (одна инструкция \/КТТЕ и КЕТОКЮМ) 
только для проверки остальной части программы, а затем, когда 
дела пойдут хорошо, можно побеспокоиться об эстетическом 
оформлении вывода. Во-вторых, подпрограмма вывода представ- 
ляет собой отделимое тело текста программы. Удаляя его из 
главной программы, мы тем самым сокращаем ее объем и одно- 
временно делаем программу более понятной. Как мы отмечали 
в гл. |, следует стремиться к тому, чтобы подпрограммы были 
достаточно короткими и текст самой большой секции в идеальном 
случае умещался на отдельной странице листинга. Одним из 
путей сокращения размеров модуля является разумное выделе- 
ние подпрограмм. 

Программа, в которой реализован изложенный алгоритм, 
приведена на рис. 3.2. Часть вывода этой программы иллюстри- 
руется на рис. 3.3. При выполнении программа создает доку- 
ментацию о самой себе, т. е. в качестве входа используется аб- 
солютно идентичная программа. 

В последнем примере этой главы мы рассмотрим программу, 
преобразующую форматы других программ. Напомним некото- 
рые положения гл. |: текст программы легче читать, если он 
начинается в соответствующих колонках; циклы легче проследить 
если тело цикла выделено; текст программы легче понять, если 
имена переменных имеют определенный смысл. Однако не все 


муъх 


зе 


еее а М 


ПРОГРАММА ПОСТРОЕНИЯ РЕМ 
(ДОКУМЕНТОВ ПО ЛОГИКЕ РАБОТЫ ПРОГРАММ) 


ПРОГРАММА ПРИНИМАЕТ ТЕКСТ ДРУГОЙ ПРОГРАММЫ НА ИСХОДНОМ 
ЯЗЫКЕ И ИЗВЛЕКАЕТ БЛОКИ КОММЕНТАРИЕВ ИЗ КАЖДОЙ ПОДПРО- 
ГРАММЫ ДЛЯ СОЗДАНИЯ РЕМ 


ЛОГИКА РАБОТЫ; 
ВВОДЯТСЯ КАРТЫ И ОСУЩЕСТВЛЯЕТСЯ ПОИСК ПОСЛЕДОВАТЕЛЬНО- 
СТИ С х * В КОЛОНКАХ 1—6. ЕСЛИ ТАКАЯ ПОСЛЕДОВАТЕЛЬНОСТЬ 
НАЙДЕНА, ТО ЭТО ОТМЕЧАЕТ НАЧАЛО БЛОКА КОММЕНТАРИЕВ. АНА- 
ЛИЗИРУЕТСЯ КОЛОНКА 72 ДЛЯ ОПРЕДЕЛЕНИЯ: 
ГЛАВНОЙ ПРОГРАММЫ (КОЛ. 72='М') 
ПОДПРОГРАММЫ (КОЛ. 72='5') 


ТОЧКИ ВХОДА (КОЛ. 72='Е’) 
ЕСЛИ ЭТО м Ваа,, ПРОГРАММА, ТО МОДУЛЬ БУДЕТ НАЗЫВАТЬСЯ 
- , Юю ° 
ЕСЛИ ЭТО ПОДПРОГРАММА ИЛИ ТОЧКА ВХОДА, ТО ИМЕНЕМ СТАНО- 
ВИТСЯ ЦЕПОЧКА БУКВ, СЧИТАННАЯ`В КОЛОНКАХ 7—12. 
ЭТО ИМЯ ПЕЧАТАЕТСЯ В ВЕРХНЕЙ ЧАСТИ КАЖДОЙ СТРАНИЦЫ РИМ. 
ЛИСТИНГ ИНСТРУКЦИЙ ПРОДОЛЖАЕТСЯ В РЕМ ДО ТЕХ 
ПОР, ПОКА НЕ БУДЕТ СЧИТАНА СЛЕДУЮЩАЯ КАРТА, СОДЕРЖАЩАЯ 
’В КОЛОНКАХ 1—6 И 'Е’В КОЛОНКЕ 72. 
ЗАТЕМ ПРОДОЛЖАЕТСЯ ПОИСК ПЕРВОЙ ПЕРФОКАРТЫ БЛОКА КОМ- 
| МЕНТАРИЕВ НОВОГО ПРОГРАММНОГО МОДУЛЯ. 


ОСНОВНЫЕ ПЕРЕМЕННЫЕ: 


МАМЕ: ИМЯ МОДУЛЯ (ОСНОВНОЙ ПРОГРАММЫ, ПОДПРОГРАММЫ 
ИЛИ ТОЧКИ ВХОДА); 

Е1МЕ: ТОЛЬКО ЧТО СЧИТАННАЯ КАРТА. ПОСРЕДСТВОМ ЭКВИВА- 
ЛЕНТНОСТИ ПОЭТОМУ МОЖНО ССЫЛАТЬСЯ НА: 
СОГ:СНАКАСТЕЮ +1 МАССИВ ИЗ 72 ЭЛЕМЕНТОВ; 


С1ТОб'СНАРАСТЕВ «6 ПЕРЕМЕННАЯ, СОДЕРЖАЩАЯ 
КОЛОНКИ 1—6; 
С7ТО12:СНАЮКАСТЕКВ «6 ПЕРЕМЕННАЯ, СОДЕРЖАЩАЯ 
КОЛОНКИ 7—1 
РАСЕМО: ЧИСЛО, КОТОРОЕ ПЕЧАТАЕТСЯ В ВЕРХНЕЙ ЧАСТИ ТЕКУ- 
ЩЕЙ СТРАНИЦЫ; 
ИМОМТ: СЧЕТЧИК СТРОК, ОСТАВШИХСЯ НА ТЕКУЩЕЙ СТРАНИЦЕ. 


ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: 
ОПТРИТ: ДЛЯ ФОРМИРОВАНИЯ И ПЕЧАТИ СЛЕДУЮЩЕЙ СТРОКИ; 
НЕАОЕБВ: ДЛЯ НАЧАЛА СЛЕДУЮЩЕЙ СТРАНИЦЫ И ВОССТАНОВЛЕ- 
НИЯ СЧЕТЧИКА СТРОК. 
ИНСТРУКЦИИ-ФУНКЦИИ: 
ЕТТЕВ(С): ЛОГИЧЕСКАЯ — ПРОВЕРЯЕТ, ЯВЛЯЕТСЯ ЛИ «С» БУКВОЙ; 
ОЕОГТ(С): ЛОГИЧЕСКАЯ — ПРОВЕРЯЕТ, ЯВЛЯЕТСЯ ЛИ «С» ЦИФРОЙ; 
* + ЗАМЕЧАНИЕ * *« ОБЕ ФУНКЦИИ ПРЕДПОЛАГАЮТ КОД ЕВСПС 
ИЛИ А$СИ, ГДЕ НЕТ НИКАКИХ ЛИТЕР, КРОМЕ БУКВ 
МЕЖДУ '’А’И 72’, И НИКАКИХ ЛИТЕР, КРОМЕ ЦИФР 
МЕЖДУ '0’ И *9'. 


ПРОГРАММИСТ: — — — ДАТА: — — — 


о сооооооооо обсоообооовсооооо ообооооооооооо ооо соооооооооооооооо 


ххх ххх ЕР 


ТМТЕСЕВ РАСЕМО, ТАОВ 
СОС ТЕТТЕВ, О1С1Т 

НАВАСТЕК 1.1МЕ*7Т2, С0(*1(72), МАМ1+1 (6 * 
СНАВАСТЕВ +6 С1Т06, С7ТО12, МАМЕ тер» свт 


ЕОИТУАЕЕМСЕ (Е1МЕ,С06(1),С1Т06)» (С0.(7),С7Т012}, {МАМЕ МАМ (1) 


РАТА 1808/5/ 


ОПРЕДЕЛЕНИЕ ИНСТРУКЦИЙ - Функций 
ТЕТТЕЯ(С)_ = (С.бЕ.ьтА' „АМО. С.Е. 1171} 
О161Т(С) = (С.6Е.'0' „АМО. С.1Е.'9*} 


ЪТМСМТ = 0 
РАСЕМО = 1 
Рис. 3.2. Программа, создающая РЕМ. (Текст в инстр. 100; «Документ по ло- 
гике работы программы», «Программа», «Стр:».) 
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жжж ЦИКЛ ГЛАВНОЙ ПРОГРАММЫ ж+ж 


ВВЕСТИ КАРТУ, НЕ НАЧИНАЕТ ЛИ ОНА НОВЫЙ БЛОК КОММЕНТАРИЕВ 
100 РЕАО(ТАОВ ,101,ЕМО=999) 1. 1МЕ | 
101 РОАМАТ(АТ2) 
1Е (С1Т06 „МЕ С жж !} 60 10 100 


НАЙДЕНО НАЧАЛО БЛОКА КОММЕНТАРИЕВ 
ЛОИСК ИМЕНИ НОВОГО ПРОГРАММНОГО МОДУЛЯ 
МАМЕ = * * 
00 200 Г = 7,12 | 
ТЕ (.МОТ.ЕТТЕЯ (С0. (17 „АМО» „МОТ. 01611 (С04(11)1 60 ТО 250 
МАН] {1-6} = СОСТ) 
200 СОМТТМИЕ 
ТЕПЕРЬ ЕСТЬ ИМЯ ИЗ 6 ЛИТЕР 
250 {Е (С01(72} „ЕО. 'М') МАМЕ = "М/РВОб* 


НАЧАТЬ НОВУЮ СТРАНИЦУ, ЕСМИ ЭТО (А) НОВАЯ ГЛАВНАЯ ПРОГРАММА. 
(В) ПОДПРОГРАММА ИЛИ (С) ТОЧКА ВХОДА И ЕСЛИ МЕНЕЕ 5 СТРОК 
ОСТАЛОСЬ НА ТЕКУЩЕЙ СТРАНИЦЕ 
1ЕР (С0.(72).Еб.'М' „ОВ. С0.(72).Е0.'$' „ОВ. У1МСМТ «ЬТ. 5} 
1 САБЕ НЕАОЕА (МАМЕ, РАСЕМО, ЕТМСМТ) 


ФОРМИРОВАНИЕ И ПЕЧАТЬ ОДИНОЧНОЙ СТРОКИ РЕМ 
275 САМ. ОЦТРИТ (СОЁ, ЕТМСМТ, РАСЕМО, МАМЕ) 
взять НОВУЮ СТРОКУ И ПРОДОЛЖИТЬ ПЕЧАТЬ. 
ПОКА НЕ ДОСТИГНЕМ КОНЦА БЛОКА КОММЕНТАРИЕВ 
АЕАО (ТАОВ,101,ЕМО=999) ЕТМЕ 
ТЕ (С1706.ЕЧ.'С ж ж '! „АМО. С0(.(12}.ЕЧ.'Е') 60 ТО 100 
60 ТО 275 


оооа о по ооо 


оо оо 


а) “ 


999 $ТОР 
ЕМО 
ЗУВАСИТИМЕ СИТРОТ (С06, Е1МСМТ, РАСЕМО, МАМЕ? 


с *ж # ООТРОТ * * ФОРМИРОВАНИЕ И ПЕЧАТЬ СТРОК + х жж жа а + * $ 
с ПОДПРОГРАММА ФОРМИРОВАНИЯ И ПЕЧАТИ ОДНОЙ СТРОКИ РЕМ 
С ВХОДНЫЕ ПАРАМЕТРЫ: 


С СОГ.: ПЕЧАТАЕМАЯ СТРОКА — СНАРАСТЕВ «|1 — МАССИВ ИЗ 
С 72 ЭЛЕМЕНТОВ; 
С ЕГМСМТ: СЧЕТЧИК СТРОК, ОСТАВШИХСЯ НА ТЕКУЩЕЙ СТРАНИЦЕ; 
С РАСЕМО: НОМЕР ТЕКУЩЕЙ ВЫВОДНОЙ СТРАНИЦЫ; 
с МАМЕ: ИМЯ ТЕКУЩЕГО ПРОГРАММНОГО МОДУЛЯ. 
С ВЫХОДНЫЕ ПАРАМЕТРЫ: 
С Е. МСМТ: ИЗМЕНЕННЫЙ СЧЕТЧИК СТРОК 
С ПОСЛЕ ПЕЧАТИ ДАННОЙ СТРОКИ: 
С РАСЕМО: УВЕЛИЧИВАЕТСЯ, ЕСЛИ НАЧАЛАСЬ НОВАЯ СТРАНИЦА. 
С ДЕЙСТВИЯ: ЛИТЕРА ’С’ В ПЕРВОЙ ПОЗИЦИИ СТРОКИ ЗАМЕЩАЕТСЯ 
С ПРОБЕЛОМ; 
С В КОЛОНКУ 72 ТАКЖЕ ЗАНОСИТСЯ ПРОБЕЛ 
Сххзх ххх ххх ВБ 
ТНТЕСЕК СТМСМТ», РАСЕМО» ХРАТ 
СНАКАСТЕК С0%ж1(72), МАНМЕ*Ь 
с ФАТА ТРАТИЛ 


с _ ЕСТЬ ЛИ ЕЩЕ МЕСТО НА ТЕКУЩЕЙ СТРАНИЦЕ? 
ТЕ (Е1МСМТ «То 1) САБ. НЕАОЕВ(СМАМЕ, РАСЕМО» Е1МСНТ 


Продолжение Рис 3.2. 
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СО 1} =! 

©0.(72) =! 

НАТТЕ {1РАТ,100} С06. 
100 — ЕОАМАТ(1Х,Т2А1) 

ЕТМСМТ = ЕТМСМТ-1 

ВЕТОВК 

ЕО 


ЗИВАООТ1МЕ НЕАОЕВ {МАМЕ, РАбЕМО, СТМСМТ} 
* * НЕАБЕВ Ж ж ВЫВОД ЗАГОПОВКА СТРАНИЦЫ % *% %* %ЖЖЖЖ+ЖжЖЖХ $5 


ФОРМИРОВАНИЕ И ПЕЧАТЬ ЗАГОПОВКА СТРАНИЦЫ 


ВХОДНЫЕ ПАРАМЕТРЫ: 
МАМЕ: — ИМЯ ТЕКУЩЕГО ПРОГРАММНОГО МОДУЛЯ 
РАСЕМО: ЧИСЛО, НУМЕРУЮЩЕЕ СТРАНИЦУ 


ВЫХОДНЫЕ ПАРАМЕТРЫ 
РАСЕМО: НОМЕР СЛЕДУЮЩЕЙ выводной СТРАНИЦЫ 
(ВХОДНОЕ ЗНАЧЕНИЕ РАСЕМО +1); 
ТМСМТ; КОЛИЧЕСТВО СТРОК. КОТОРЫЕ МОГУТ БЫТЬ НАПЕЧАТАНЫ 


НА НОВОЙ СТРАНИЦЕ 
хх жжхжж жж хуя жя жж Е 


попов аосапоаааосо 


ТМТЕСЕЮ РАСЕМО, &ТМСМТ, ТРАТ,; МАХЕМ 
СНАКАСТЕЮ МАМЕЖЬ 
РАТА ТРЕТ/6б/, МАХЕМ/56/ 
ЧЯТТЕ ( РЕТ,100) МАМЕ, РАСЕМО 
300 РОАМАТ {'1', 2Х, *РАОСВАМ 10СТС МАМИАТ*, 10Х» 
1 АООТ1МЕ: *, Аб, 161; 'РАбЕ: ', 14 / \ 
РАСЕМО = РАСЕМО+1 
ЕТМСМТ = МАХЬМ 
ВЕТУВМ 
ЕМО 


Продолжение Рис 3.2. 


ДОКУМЕНТ, ПО ЛОГИКЕ РАБОТЫ ПРОГРАММЫ: ПРОГРАММА М/РЮОС СТР: 1 
жж хх # * я СТРОЕНИЯ РЕМ яя ные 
ПРОГРАММА ПОСТРОЕНИЯ РЕ. 
(ДОКУМЕНТА ПО ЛОГИКЕ РАБОТЫ ПРОГРАММЫ) 

ПРОГРАММИСТ: — — — ДАТА: — — — 


ПРОГРАММА ПРИНИМАЕТ ТЕКСТ ДРУГОЙ ПРОГРАММЫ НА ИСХОДНОМ 
ЯЗЫКЕ И ИЗВЛЕКАЕТ БЛОКИ КОММЕНТАРИЕВ ИЗ КАЖДОЙ ПОДПРО- 
ГРАММЫ ДЛЯ СОЗДАНИЯ РЕМ 


ЛОГИКА РАБОТЫ: 
ВВОДЯТСЯ КАРТЫ И ОСУЩЕСТВЛЯЕТСЯ ПОИСК ПОСЛЕДОВАТЕЛЬНО- 
СТИ С++ В КОЛОНКАХ 1—6. ЕСЛИ ТАКАЯ. ПОСЛЕДОВАТЕЛЬНОСТЬ 
НАЙДЕНА, ТО ЭТО ОТМЕЧАЕТ НАЧАЛО БЛОКА КОММЕНТАРИЕВ. 
АНАЛИЗИРУЕТСЯ КОЛОНКА 72 ДЛЯ ОПРЕДЕЛЕНИЯ: 
ГЛАВНОЙ ПРОГРАММЫ (КОЛ. 72='М') 


ПОДПРОГРАММЫ (КОЛ. 72='’5') 
ТОЧКИ ВХОДА (КОЛ. 72=’Е’) 

ЕСЛИ ЭТО ГЛАВНАЯ ПРОГРАММА, ТО МОДУЛЬ БУДЕТ НАЗЫВАТЬСЯ 
» Р ы 


К . 
ЕСЛИ ЭТО ПОДПРОГРАММА ИЛИ ТОЧКА ВХОДА, ТО ИМЕНЕМ СТАНО- 
ИТСЯ ЦЕПОЧКА БУКВ, СЧИТАННАЯ В.КОЛОНКАХ 7-12. 
ЭТО ИМЯ ПЕЧАТАЕТСЯ В ВЕРХНЕЙ ЧАСТИ КАЖДОЙ СТРАНИЦЫ РЕМ. 
ЛИСТИНГ ИНСТРУКЦИЙ ПРОДОЛЖАЕТСЯ В РГМ ДО ТЕХ 
ПОР, ПОКА НЕ БУДЕТ СЧИТАНА СЛЕДУЮЩАЯ КАРТА, СОДЕРЖАЩАЯ 
С’* *«’В КОЛОНКАХ 1—6 И '”Е’В КОЛОНКЕ 72. 
ЗАТЕМ ПРОДОЛЖАЕТСЯ ПОИСК ПЕРВОЙ ПЕРФОКАРТЫ БЛОКА КОМ- 
МЕНТАРИЕВ НОВОГО ПРОГРАММНОГО МОДУЛЯ. 


Рис. 3.3. Образец распечатки программы, создающей РЕМ. 
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ОСНОВНЫЕ ПЕРЕМЕННЫЕ: 
МАМЕ: ИМЯ МОДУЛЯ (ОСНОВНОЙ ПРОГРАММЫ, ПОДПРОГРАММЫ ИЛИ 


ТОЧКИ ВХОДА); 


ЫМЕ: ТОЛЬКО ЧТО СЧИТАННАЯ КАРТА, ПОСРЕДСТВОМ ЭКВИВАЛЕНТ- 


РАСЕМО: 
ГИМСМТ: 


НОСТИ ПОЭТОМУ МОЖНО ССЫЛАТЬСЯ НА: 


СОГ:СНАВКАСТЕВ 1! МАССИВ ИЗ 72 ЭЛЕМЕНТОВ; 

С1ТОб:СНАКАСТЕК *хб ПЕРЕМЕННАЯ, СОДЕРЖАЩАЯ 
КОЛОНКИ 1—6 

С7ТО12:СНАКАСТЕКЮ *б6 ПЕРЕМЕННАЯ, `СОДЕРЖАЩАЯ 


КОЛОНКИ 7—12; 
ЧИСЛО, КОТОРОЕ ПЕЧАТАЕТСЯ В ВЕРХНЕЙ ЧАСТИ ТЕКУ- 
ЩЕЙ СТРАНИЦЫ; 
СЧЕТЧИК СТРОК, ОСТАВШИХСЯ НА ТЕКУЩЕЙ СТРАНИЦЕ. 


ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: 


ОПТРОТ: 


НЕАОЕК: 


ДЛЯ ФОРМИРОВАНИЯ И ПЕЧАТИ СЛЕДУЮЩЕЙ СТРОКИ; 
ДЛЯ НАЧАЛА СЛЕДУЮЩЕЙ СТРАНИЦЫ `И ВОССТАНОВЛЕ- 


‚ НИЯ СЧЕТЧИКА СТРОК. 


ИНСТРУКЦИИ — ФУНКЦИИ: 
ГЕТТЕЮК(С): ЛОГИЧЕСКАЯ — ПРОВЕРЯЕТ, ЯВЛЯЕТСЯ ЛИ «% БУКВОЙ; 


РТСТТ(С): 


ЛОГИЧЕСКАЯ — ПРОВЕРЯЕТ, ЯВЛЯЕТСЯ ЛИ «< ЦИФРОЙ; 


* * ЗАМЕЧАНИЕ *«*« ОБЕ ФУНКЦИИ ПРЕДПОЛАГАЮТ КОД ЕВСЬ!С 


ИЛИ А$СИ, ГДЕ НЕТ НИКАКИХ ЛИТЕР, КРОМЕ БУКВ 
МЕЖДУ '’А’И '2’; И НИКАКИХ ЛИТЕР, КРОМЕ ЦИФР 
МЕЖДУ 0’ И '9'. 


РУКОВОДСТВО ПО ЛОГИКЕ РАБОТЫ ПРОГРАММЫ ПРОГРАММА: ООТРОТ СТР:2 
*ж х ООТРОТ + ж ФОРМИРОВАНИЕ И . ПЕЧАТЬ СТРОК хз 
ПОДПРОГРАММА ФОРМИРОВАНИЯ И ПЕЧАТИ ОДНОЙ СТРОКИ РЕМ 
ВХОДНЫЕ ПАРАМЕТРЫ: 


ЫГМСМТ: 
РАСЕМО 
МАМЕ 


ПЕЧАТАЕМАЯ СТРОКА — СНАВАСТЕЮ+ | МАССИВ ИЗ 
72 ЭЛЕМЕНТОВ; 

СЧЕТЧИК СТРОК, ОСТАВШИХСЯ НА ТЕКУЩЕЙ СТРАНИЦЕ; 
НОМЕР ТЕКУЩЕЙ ВЫВОДНОЙ СТРАНИЦЫ; 

ИМЯ ТЕКУЩЕГО ПРОГРАММНОГО МОДУЛЯ. 


ВЫХОДНЫЕ ПАРАМЕТРЫ: 


ИМСМТ 
РАСЕМО 


ДЕЙСТВИЯ: 


ИЗМЕНЕННЫЙ СЧЕТЧИК СТРОК: СКОЛЬКО ОСТАЛОСЬ 
ПОСЛЕ ПЕЧАТИ ДАННОЙ СТРОКИ; 
УВЕЛИЧИВАЕТСЯ, ЕСЛИ НАЧАЛАСЬ НОВАЯ СТРАНИЦА 


ЛИТЕРА '’С’ В ПЕРВОЙ ПОЗИЦИИ СТРОКИ ЗАМЕЩАЕТСЯ 
ПРОБЕЛОМ: 
В КОЛОНКУ 72 ТАКЖЕ ЗАНОСИТСЯ ПРОБЕЛ 


РУКОВОДСТВО ПО ЛОГИКЕ РАБОТЫ ПРОГРАММЫ ПРОГРАММА: НЕАШОЕБВ СТР: 3 
* х НЕЛАОЕВ * + ВЫВОД ЗАГОЛОВКА СТРАНИЦЫ жж 


ФОРМИРОВАНИЕ И ПЕЧАТЬ ЗАГОЛОВКА СТРАНИЦЫ 
ВХОДНЫЕ ПАРАМЕТРЫ: 


МАМЕ: 
РАСЕМО: 


ИМЯ ТЕКУЩЕГО ПРОГРАММНОГО МОДУЛЯ; 
число. НУМЕРУЮЩЕЕ СТРАНИЦУ. 


ВЫХОДНЫЕ ПАРАМЕТРЫ: 


РАСЕМО: 
Г1МСМТ: - 


НОМЕР СЛЕДУЮЩЕЙ ВЫВОДНОЙ СТРАНИЦЫ 

(ВХОДНОЕ ЗНАЧЕНИЕ РАСЕМО-+ 1) 

КОЛИЧЕСТВО СТРОК, КОТОРЫЕ МОГУТ БЫТЬ НАПЕЧА- 
ТАНЫ НА НОВОЙ СТРАНИЦЕ. 


Продолжение Рис. 3.3. 


программисты следуют этим рекомендациям. Мы рассмотрим 
программу, которая принимает на входе плохо оформленные 
программы на Фортране и в соответствии с изложенными реко- 
мендациями производит в них косметические изменения. 

При построении алгоригма мы, по существу, будем фдти тем 
же путем, по которому прошел автор этой программы. Следует 
подчеркнуть, что это, конечно, не единственный из возможных 
способов разработки алгоритма. В книге демонстрируются 
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различные стили программирования и составления документации. 
Вам необходимо выработать свой собственный стиль, естествен- 
ный и эффективный для решения ваших задач. 

Итак, перед нами стоит задача: дана программа на Фортране, 
требуется построить идентичную программу, отличающуюся 
только внешним оформлением. Требуемые изменения сводятся 
к следующему: 


1. Предварительно установить начало всех инструкций в 
колонке 7. 

2. При появлении слова ОО сместить начало каждой после- 

дующей строки на три позиции вправо по отношению к 

текущему началу. 

При появлении слова СОМТИГМУЕ сдвинуть начало после- 

дующих строк на три позиции влево. 

Никогда не начинать строки далее колонки 25 (при глу- 

бине в шесть уровней) и раньше колонки 7 (без отступа). 

Не изменять положения инструкций ЕОКМАТ. 

Если нужно, по всей программе заменить вхождения 

определенной цепочки какой-либо другой цепочкой (на- 

пример, изменить имя одной переменной на другое). 

7. Полагаем, что в ключевых словах ЕОКМАТ, РО или 
СОМТИХИЕ нет пробелов. (Справа и слева от этих слов, ко- 
нечно, могут быть пробелы.) 


ом в = 


После того как мы в общих чертах сформулировали задачу, 
можно перейти к основным этапам ее решения: 


1. Прочитать перфокарту и найти начало инструкции. 

2. Проверить: нет ли ключевых слов РО, СОМТИМИЕ или 
РОК МАТ. 

3. Найти образец, по которому требуется произвести изме- 
нения. 

4. Вывести измененный текст, следя за строками продол- 
жения. | 

5. Вернуться к шагу 1 для обработки всех инструкций 
программы. 


Этот черновой набросок действий —. в сущности первый этап 
нисходящего конструирования программы. Поскольку логика 
обработки проста, мы не приводим полную блок-схему или ал- 
горитм ее реализации. При разработке программы, преобразую- 
щей формат, мы вновь встречаемся с тремя видами операций ` 
над литерами — пересылкой гекста, поиском определенных групп 
литер и поиском первой литеры, отличной от пробела. Три пере- 
численных вида операций над литерами удобно выделять в 
подпрограммы. Поэтому мы составим и отладим подпрограммы 


ЗиВКОПТУМЕ СНМОУЕ (ТО, ТоРО$, ТОЦЕМ, РВОМ, РАРОЗ, ЕАГЕМ» МОМЕЕМ) 
ЖЖ СНМОУЕ жжжжжжжжжж жжжж жжжжжжжж жж жж жЖХ $ 


УНИВЕРСАЛЬНАЯ ПОДПРОГРАММА ПЕРЕСЫЛКИ ЛИТЕР 


ПЕРЕСЫЛАЕТ ДАННЫЕ ИЗ МАССИВА „ЕВОМ“ В МАССИВ „ТО“. 

МАКСИМАЛЬНЫЕ РАЗМЕРЫ ЭТИХ МАССИВОВ „зЕВЕЕМ“ И ээТОГЕМ“. 

ЛОЗИЩИЙ, ИЗ КОТОРЫХ И В КОТОРЫЕ ВЫПОЛНЯЕТСЯ ПЕРЕСЫЛКА, СОДЕРЖАТСЯ, 
СООТВЕТСТВЕННО, В „„ЕАРО$““ И „ТОРО$“. , 

КОЛИЧЕСТВО ПЕРЕСЫМАЕМЫХ ДАННЫХ УКАЗАНО В ПЕРЕМЕННОЙ „МОУЦЕМ» 


РЕГИВТРИРУЕМЫЕ ОШИБКИ? ц р 
ЕСЛИ КОЛ-ВО ПЕРЕСЫМАЕМЫХ ЛИТЕР ПРЕВЫШАЕТ РАЗМЕР МАССИВА „„ЕНОМ“” ИЛИ „›ГОэ 
ТО ПЕРЕСЫЛАЮТСЯ ТОЛЬКО ЛИТЕРЫ В ПРЕДЕЛАХ МАССИВА „ 


ПЕРЕСЫЛКА ВЫПОЛНЯЕТСЯ ПОЛИТЕРНО, СЛЕВА НАПРАВО. 
МАССИВЫ ››ТО“ И „РЕАОМ“” МОГУТ, ЕСЛИ НУЖНО, ПЕРЕСЕКАТЬСЯ 


ПРОГРАММИСТ; --= ДАТА" =-- 


вов оовобооровооооов 


жжжжжжжжж жжжжжжх жж жжжж жжжжжжжжжжжх Е 


ТМТЕСЕВ ТОСЕМ» РАСЕМ» ТОРО$, РЕВРО$, МОУБЕМ 
СНАКАСТЕВЖ1. ТО(ТОСЕМ)» РАОМ(ЕРАБЕМ) 


С; ® + > ь «ОПРЕДЕЛИМ МАКС, КОЛИЧЕСТВО ПЕРЕСЫМАЕМЫХ ЛИТЕР 
С. а х + а «ТОГЕН-ТОРО$+1 = МАКС. КОЛ-ВО ДАННЫХ, ОСТАВШИХСЯ В МАССИВЕ „ГО 
Се ох а в « +ТОЖЕ САМОЕ ДЛЯ МАССИВА „ЕВОМ“ 

МОУБЕМ = ММО (МОУБЕМ, ТОЪЕМ-ТОРО$+1» ЕРАБЕК-РАБЕМ+),} 

ТЕ ({МОУЬЕМ +1Е. 0) АЕТИАМ 


С» а © & ® „ПРАВИЛЬНОСТЬ ПЕРЕСЫЛКИ ОБЕСПЕЧЕНА? ПО 1 ЛИТЕРЕЗ 
00 10 1 = 1» МО\УЕЕМ | 
ТО(Т0РО$+1-1} = РАОМ(РАРО$+Т-1} 
10 СОМТТНУЕ 
ВЕТУКМ 
ЕМС 


ЗУВКООТТМЕ СНЕТМЬ (ТААСЕТ, РАТТВМ, РАТЕ, СО, ЗКТР, ЕОИМО) 
ЖЖ СНЕМОЖЖ Ж ЖЖЖЖЖЖЖ ЖЖ ЖЖ ЖЖ ЖжЖжЖжЖжЖЖЖЖЖЖЖЖЖ 8 


ПРОГРАММА ИЩЕТ ЦЕПОЧКУ ЛИТЕР 


ПОИСК ЦЕПОЧКИ „РАТТАМ ДЛИНОЙ „РАТЕ В ЦЕПОЧКЕ „ТАВСЕТЕ. 
ПОИСК НАЧИНАЕТСЯ В ПОЗИЦИИ „,С0Е“® ЦЕЛОЧКИ „ТАВСЕТ®» 


ЕСЛИ В „УГАВСЕТ““ НЕ ОСТАЛОСЬ ПОЗИЦИЙ „„РАТЫ“, 
Т.Е« С01+РАТГ-1 „СТ. САВОЬ (=80), ТО 
РОиМО <= „РАЕЗЕ, И ВОЗВРАТ 


ЕСЛИ СЛЕДУЮЩИЕ ПОЗИЦИИ „„РАТЕ“ И ЦЕПОЧКИ „„ТАВСЕТ” СООТВЕТСТВУЮТ- 
зРАТТАМ“, ТО „„РОИМО“ <=«ТКИЕ.» СОТ. НЕ ИЗМЕНЯЕТСЯ 

с ВЫПОЛНЯЕТСЯ ВОЗВРАТ. 7 
т ЗЫВАЕТ, ДОЛЖНЫ ЛИ ЛИТЕРЫ СОВЛАДАТЬ С ПОЗИЦИ 1 
ИЛИ С0 СЛЕДУЮЩИХ ПОЗИЦИЙ. д позиции „СО 

ЕСЛИ „КТР“ РАВНО .ТВЦЕ.. ТО ПРИ НЕУДАЧЕ В ПОЗИЦИИ +,60148 
ПОИСК ПРОДОЛЖАЕТСЯ В ПОЗИЦИЯХ С01+1, С01+2,.ь.з ПОКА 
(А) НЕ БУДЕТ ПОЛУЧЕНО СООТВЕТСТВИЕ . ТОГДА? 

Соььь - СОГ <= КОЛОНКА, ГДЕ НАЧАЛОСЬ СОВПАДЕНИЕ 

С. , «в , ГОИМО <= .ТВИЕ. И ВОЗВРАТ . 

С . (8) „ТАВСЕТ“ ИСЧЕРПАНА? СООТВЕТСТВИЯ НЕ НАЙДЕНО В 

С. и ъь» СО, С0Е41, .езэ СО1+К И 01+ (К+1) + РАТЕ--1 „СТ. `САВОГ. 

С...» » ЗАТЕМ „РОИМО“ <= .РАЗЕ. э э›С01% ОСТАЕТСЯ НЕИЗМЕННЫМ 


ооо бособоооваорово 


с 
с ПРОГРАММИСТ: —--- ДАТА; == 


СЖЖжжжхжх жж жж жжжжжжж жж жж жж х Е 
ТМТЕСЕА РАТЬ, С01., САВОЕ/80/ 
РОСТСАЕ ЗКТР. РОПМО 
СНАКАСТЕНЖ1 ТАВСЕТ (80). РАТТАМ (РАТЕ) 
ЕОЦМО = „РАТЗЕ. 


Рис. 3.4. Программа, изменяющая формат карт. 
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Се ® о > « „СНАЧАЛА ПРОВЕРИТЬ ПРАВИЛЬНОСТЬ аоднЫх ДАННЫХ 
1Е (РАТЬ о$ЁТ 1 „ОА. СОС „АТ, 1) 
Со ооьо ПРОВЕРИТЬ "ЧТ ПОЗИЦИИ РАТЬ НАХОДЯТСЯ- 8 „ТААСЕТ“8 
ТЕ (СОЕ+РАТЬ-1 „6Т. САРОС) ВЕТИАМ 
С» © + › › „НАЧАЛО ПОИСКА С ПОЗИЦИИ „,С01< 
Т5ТААТ = 01 
ТЕМО = СО. 
Се... ЕСЛИ КТР РАЗРЕШЕН, ОПРЕДЕЛИМ ПОСПЕДНЕЕ ВОЗМОЖНОЕ НАЧАЛО 
ТЕ (5$К1Р} ТЕМО = САВОЕ-РАТЬ +1 


® ® › ЕСЛИ ЛЕРВАЯ БУКВА ПОДХОДИТ, ПРОВЕРИТЬ ВСЮ ЦЕПОЧКУ 
20 100 4 = Т5ТАВТ, ТЕМО 
1Р (ТАЯСЕТ( У) „МЕ. РАТТАМ(1}) 60 ТО 100 
ТЕ {РАТЬ „ЕЧ» 1) С( ТО 200 
С» эф о о „СРАВНЕНИЕ НА ПОЛНОЕ СООТВЕТСТВИЕ 
00 50 К = 2, РАТЬ 
ТЕ (ТААСЕТ(.+К-1} „МЕ» РАТТ 
50 сом МЕ РАТТАМ(К!) 60 ТОС 100 
60 ТО 200 
100 СОМТТ№Е 
Се в в + ® ЕСЛИ ВЫШЛИ, СЮДА, НЕ НАЙДЕНО - ВОЗВРАТ 
АВЕТУАМ 


С» © х = е «НАЙДЕНО ПРАВИЛЬНОЕ СООТВЕТСТВИЕ 
200 РОЦМО = э„ТВУЕе 
СО = 4 
КЕТИУВМ 
ЕМО 


з 
® 
5 


ЗИВАОСОТТМЕ №081.МК (ЁТМЕ, СОЁ, РОЦМО) 
Ж Ж МОВЕМКЖ жж ж жжжжж жж жж жж жжжжжжжжжжжжжх 9 


ЭТА ПОДПРОГРАММА НАХОДИТ СЛЕДУЮЩУЮ ОТЛИЧНУЮ ОТ ПРОБЕЛА 
ПИТЕРУ В МАССИВЕ „,1ТМЕ“° РАЗМЕРА 80, НАЧИНАЯ С ПОЗИЦИИ ..С01“ 


ПРИ ПОИСКЕ АНАЛИЗИРУЮТСЯ позиции С0С., С0.-+1, С01+2, в.д ПОКА: 
(А) НЕ БУДЕТ НАЙДЕНА ОТЛИЧНАЯ ОТ ПРОБЕЛА ИТЕРАЗ 
С а е © + ое «ТОГДА СОЁ ВОЗВРАЩАЕТСЯ С ПОЗИЦИЕЙ ПРОБЕ. ЛА 
® © х © © «И РОИМО = $ ГКИЕ о ИЛИ 

(В) НЕ НАЙДЕНО НИ ОДНОЙ ОТЛИЧНОЙ ОТ ПРОБЕЛА ЛИТЕРЫ* ТОГДА 
Сь соо о «С01. НЕ ИЗМЕНЯЕТСЯ И 
С. « © «в « «РГОЦМО = «РА|.ЗЕь 


С 
с 
С 
С 
С 
С 
С 
С 
с 


С . 
С ПРОГРАММИСТ: --- ДАТА: --- 
Скжжжжжжжх жжжжж жж жжжжжжжжжжжжжяжжжж Е 


ТМТЕСЕВ С06 
1О061САЕ РОУМО 
СНАВАСТЕВ*1 ВЕАМК/"'/, ТМЕ( 80) 
С. че с в «ПОКА СООТВЕТСТВИЯ НЕТ; ИЗМЕНИМ, ЕСЛИ НАЙДЕМ СООТВЕТСТВИЕ 
ЕОЦМО = „ЕЛАЗЕ. 
ТЕ (СОК „СТ. 80 „08. СОК „ЛЕ. 0) ВЕТУВМ 


С. ‹ + © # «ПРОВЕРЯЕМ КАЖДУЮ КОПОНКУ 
ра 10 Т=Ссо%, 80 
ТЕ (Е1МЕ(ТЬ „МЕ, ВЕАМК) 60 ТО 20 
10 СОМТТМОЕ 
Се ча < о ЕСЛИ ВЫШЛИ СЮДА, СООБЩАЕМ О НЕУДАЧЕ 
КЕТУВМ 


С. - е = + «ЛИТЕРА НАЙДЕНА, СООБЩАЕМ ОБ УСПЕХЕ 
20 Е0УМО = „ТВУЕ. 
СО = 1 
ВЕТИАМ 
ЕМО 


НЕЕ ЕЖЕЕИЯУЕСЕСТЕЯЕНЕЕЫ 


=з ГЛАВНАЯ ПРОГРАММА == 


опооа 


Продолжение Рис. 3.4. 


180 Гл. 9. Программирование нечисленных задач 


жжжжжжжжжжжжжжжжжж жжжжжжжжхжж жжжж М 
РЕФОРМАТОР ПЕРФОКАРТ 
ЭТА ПРОГРАММА ИЗМЕНЯЕТ ФОРМАТ ПРОГРАММ 


ОНА ДЕЛАЕТ ОТСТУП В ЦИКЛАХ И ИЗМЕНЯЕТ ДРУГИЕ ЦЕПОЧКИ. 

ПРОГРАММА `ВВОДИТ ПЕРФОКАРТУ., РАЗБИТУЮ НА 4 КОМПОНЕНТЫ 
(Утмтмо, СОМТ, ТМСАА, ЗЕСРЕО) 

И ПРЕОБРАЗУЕТ ЭТУ КАРТУ 


ОСНОВНЫЕ ПЕРЕМЕННЫЕ: 

ТМСАВ (66): СЧИТЫВАЕМАЯ КАРТА 

ОЦТСАЯ (132)$ СЛЕДУЮЩАЯ КАРТА ВЫВОДА 

ТМОЕМТ: ЧИСЛО ПРОБЕЛОВ ДЛЯ СЛЕДУЮЩЕЙ СТРОКИ 

ОЕГЗТВ:  УНИЧТОЖАЕМАЯ ЦЕПОЧКА ДЛИНОЙ „.ОЕСТЕМ 

ВЕРЕ: ЦЕПОЧКА ДЛИНОЙ у, КЕРЕЕМ“° ЗАМЕЩАЕТ УНИЧТОЖЕННУЮ 


ПРОГАММИСТ: --- ДАТА? -- * 
Сжжх х жжжжжжж жжжжжжжжж *х ЖжжжжжЖжжЖжжжжх Р 
С 


обббобсооооов ооо ооо 


ЕЧУТУАСЕМСЕ (5ТМТМО, СОТ) 
ЕОСТСАЕ АМСНОВ, ЕСИМО 
СНАВАСТЕЯ*1 [МСАВ (66), ОЦТСАВ (132) „СО 1 
СНАРАСТЕЙ 5ЕОЕЕО+В, ЗТМТМО*5, СОМТ*1 
СНАРАСТЕВ*] РОАМАТ( 6), 00(2}), СОМТ!М(8), ОЕСЗТА (5), РЕР(4} 
[МТЕСЕВ ОЕБКОС, ТМОЕМТ, ЕМОЕОС, МЕХТТМ, ОЕККЕМ, 
Х —МЕРЬЕМ, САВОЕМ, ООТУМТ, СО, ВЕРЬОС, Т0РО$ 
ЕОСТСАК АМСНОВ, РОУМО 
ЕЧОТУАСЕМСЕ (5ТМТМО, СОТ) 
ОАТА РОАМАТИ ТЕ" "ОА ме, "А, Ттеи, 00/0’, 01 
ОАТА СОМТТМИ "С, "0", М", ттТе, ето земе ее, трех 
ОРАТА УМОМ1Т/И5И, ОЧТУМТИТИ, СААОЕМ/66/ 
С» « . - > «НАПРИМЕР, ЗАМЕНИТЬ „ОМХУ7“ НА „ХУ70“ 
ОАТА ВЕРЕЕМ/4 У, ВЕРЕИ"Х!', ТУ", 17," (И, АМСНОВИ. ТАЦЕ. / 
ОАТА ОЕТТЕМИ5 И, ОБАЗТАИ "Ц "НХ" ть тдеи, ОИТСАВИ132%1 #/ 
МЕХТ 1М= 1, 
90 ВЕАО (1МИМТ, 100,ЕМО=999} ЗТМТМО, СОМТ, 1МСАВ , ЗЕСЕЕО 
. 199 РОВМАТ (А5,А1,66А1: АВ) 


С. + ‹ - . „НАЧАЛО СКАНИРОВАНЯЯ НОВОЙ КАРТЫ 
110 ТМОЕМТ = МЕХТЦ М 
1Е (С061 „ЕЯ. 1С'!) С0 ТО 120 
СО = 1 . 
С в е х > «ВЗЯТЬ ПЕРВЫЙ НЕ-ПРОБЕЛ; ИГНОРИРОВАТЬ ПУСТУЮ КАРТУ 
САС. МОВЕМК (ТМСАВ,СОЕ, Е0И№О, САВОЕМ) 
ТЕ (.М№ОТ» ЕОУМРу 60 Та 90 


Сь © ь» и + »КАРТА ФОРМАТ? ЕСЛИ ДА, НЕ ПРЕОБРАЗУЕМ 
САБЫ СНЕТМО (1МСАВ, РОАМАТ, 6, СОЕ»АМСНОВ,Е00МО , САВРЕМ} 
ЗЕ (МОТ. ЕОШМО} 60 ТО 200 
420 ИА1ТЕ (ОУТУМТ, 100) $ТМТМО, СОМТ. 1МСАВ , $ЕОЕЕО 
АЕАО (ТМИМТТ, 100,ЕМО=999) ЗТМТМО, СОМТ,1МСАК, ЗЕДЕГО 
ТЕ ((СОМТ. ЕВ.’ * „ОА, СОМТ.ЕС.'0'),АМОР, С011.МЕ.'С'} Са ТО 110 
с 60 ТО 120 
Се + + ‹ ь „КАРТА СОМТТМИЕ? СОКРАШАЕМ ОТСТУП 
200 САЕГ- СНЕТМО (ТМСАЯ, СОМТТМ, В, СО, АМСНОВ , Е00№0, СААРЕМ} 
1Е (МОТ. РОУМО») 60 ТО 250 
МЕХТТМ = МАХО(1, ТМОЕМТ-З) 
60 ТО 300 и 
С. + + + х „КАРТА ЦИКЛА 002 УВЕЛИЧИВАЕМ ОТСТУП НА 6 ПОЗИЦИИ 
250 СА. СНЕТМО (ТМСАЯА,00,2,С01,АМСНОВ, Е0ИМО, САВОЕМ} 
1Е (.МОТ. РОУМО) 60 ТО 300 
МЕХТТМ = МГМО{ 1МОЕМТ+3, 19} 
С „ 
С, „5.5. «ПОИСК ЦЕПОЧЕК, ПОДЛЕЖАЩИХ ВЫЧЕРКИВАНИЮ/ЗАМЕЩЕНИЮ 
300 ВЕРЬЕОС = СО 
САКЬ СНЕТКО (ТЫСАА, СЕЕЗТА, ОЕССЕМ, ВЕРЕОС , «МОТ › АМСНОВ ‚ РОУМО, САВОЕМ} 
1Е (.МОТ.ЕО00МО) С0 ТО 400 
С. > „ о $ „НАИДЕНА ПЕПОЧКА ДЛЯ ЗАМЕЩЕНИЯ 
Со = © + « «ПЕРЕСЛАТЬ ВППОТЬ ДО НАЧАЛА ЗАМЕЩЕНИЯ 


Продолжение Рис. 3.4. 


Упражнения 181 


ТОРО$ = ТМОЕМТ 
МОМЕЕМ = ВЕРЕОС-СОЕ+Т 
САС СНМОУЕ ( ОУТСАА , ТОРО$ ‚„2+САВОЕМ, 
Х ТМСАВ, СОЕ,САВОЕМ, МОМЕЦМ) 
СОЕ = СО +МОМЕСМ+ОВЕССЕМ 
с. . ‹ + о „ПЕРЕСЛАТЬ ЗАМЕЩАЕМУЮ ЧАСТЬ 
САЕЬ СНМОУЕ (ОЧТСАЯ, ТОРО$ , 2®САВОКМ, ВЕРЕ , 1 ВЕРЕЕМ, ВЕРЬЕМ$ 
НОУЕЕМ = САВОЕМ-СОЕ 
70Р05$ = ТОРОЗ+ВЕРЕЕМ 
©. ‹ «о # „ПЕРЕСЛАТЬ КОНЕЦ ИНСТРУКЦИИ 
САЕЕ СНМОУЕ (ОУТСАЯ ‚ ТОРО$ ,2*+САЙВОЕМ, 
х МСА, СО ,САВОЕМ, МОУЕСМ } 
ЕМОБОС = С0|}+МОУЕЕК-) 
с 60 ТО 500 
с. . . . о „ПРОСТЕЙШИЙ СЛУЧАЙ: ЗАМЕЩЕНИЙ НЕТ 
400 „САЕЕ СНМОУЕ ({ ОЧТСАЯ ‚ ТМОЕМТ ‚ 2+САВОЕМ, ТМСАА, СОЁ,САКОЕМ, САВОЕК-С04+ 1} 
с ЕМОСО = 1МРЕМТ*+С ААОЕМ-С0+1 


с. . . . г „КАРТА, СФОРМИРОВАННАЯ В „ОИТСАВ“ $ ВЫВОД, 
500 МА[ТЕ (ОУТУмТ,100) УТМТМО , СОМТ , КОУТСАЯ (1) ,1=1,САВОКМ),$ЕСЕБО 
ТЕ (ЕМОСОЕ „ЕЕ. СААОЕМ) 0 ТО 550 
с. .. .. „ДЛЯ ДЛИННЫХ ИНСТРУКЦИЙ НЕОБХОДИМО ПРОДОЛЖЕНИЕ. 
САС МОВЕМК (ОУТСАВ, САЯОКМ+ 1, РО0УМО, 2*САВОЕНУ 
ТЕ (МОТ. ЕРОЧМО) 60 ТО 550 
САБЫ СНМОУЕ (ОЧУТСАЙ, 1МОЕМТ, 2*САКОЕМ, 
Хх ОЧТСАА, САВБЕМ+ 1, 2*САВОЕМ, СААОМ-1НОЕМТ) 
ЕМОСОЬ = ЕМОСО- (СААОКМ- ГМОЕМТ +1 ) 
с.... $ ео пОИНИтЬ ПРОБЕЛАМИ ПОЛЕ МЕТКИ И КОЛОНКИ 73-80 
УТМТМО = 11 
СОМТ = "Хх! 
60 ТО 500 
с 
С. + ‹. о « „ЗАПОЛНИТЬ ПРОБЕЛАМИ ОСТАТОК ПЕРФОКАРТЫ 
550 4 = 2*САВОЕМ 
00 560 Г = 1,4 
ОИТСАЯ (1 ] = 1 
с 560 СОМТТМУЕ 


С. . . . <- „ВВОДИМ СЛЕДУЮЩУЮ ВХОДНУЮ КАРТУ 
КЕАО (ТМОМ1Т,100,ЕМОз=999) $ТМТМО, СОМТ, 1МСАА , $Е СЕК Ц 
ТР (СОМТ «МЕ. ' *,АМО. СОМТ „МЕ. #0') 60 ТО 300 
60 ТО 110 
999 ТОР 
ЕМО 


Продолжение Рис. 3.4. 


СНМОУЕ, СНЕГУХО и МОВЕМК. Имея три указанные подпро- 
граммы, было легко построить главную программу. Полный 
текст программы приведен на рис. 3.4. 


Упражнения 


3.01. Напишите процедуру ПМТЕСЕВ ЕУМСТ1ОМ МХТВЕК с тремя парамет- 
рами: $ТК Ма, ЗТВГЕМ и 1РО$: ЗТК Ма — массив, имеющий длину ЗТК- 
ГЕМ. 1РО$ — целая величина между | и ЗТВГЕМ. Эта функция возвращает 
номер позиции первого обнаруженного пробела, при анализе массива, начиная 
с элемента ЗТЕ1Ма(ТРО$); она возвращает —1, если РОЗ имеет отрицатель- 
ное значение, нулевое значение или большее ЗТВГЕМ, и 0, если ни один из 
элементов не является пробелом. 


3.02. Напишите процедуру ПМТЕСОЕВ ЕОМСТ1ОМ МОМВЕК с теми же пара- 
метрами, что и в предыдущем примере. Функция возвращает позицию первой 
в $ТВПМЯ отличной от пробела литеры. 
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3.03. Напишите подпрограмму МЕХТУ, имеющую три параметра: ВОЕЕЕКЮ, 
РОЗМ и ГЕМ. ВЧЕЕЕВ — это массив размером 80, РОЗМ — число между 
Ти 80. Подпрограмма анализирует элементы ВОЕЕЕК (РО$М), ВУЕЕЕК 
(РО$М--1),..., отыскивая первую буву. Затем, начиная с позиции, в которой 
найдена буква, подпрограмма анализирует последующие позиции, отыскивая 
первый пробел, знак пунктуации или конец буфера. Подпрограмма возвращает 
параметр РО$М, значением которого является первая найденная буква, и 
параметр ГЕМ, в котором содержится длина слова (начиная с позиции, 
в которой была найдена первая буква). 


3.04. Напишите систему из шести функций типа ГОСТСАЕ: СЕФ, СМЕ, СЁЕ, 
СЕТ, СЦЕ и СОТ — с параметрами ЗТК1, ГЕМТ, ЗТК2 и ГЕМ2. Подпрограм- 
мы должны возвращать .ТКОЕ. ‚если цепочка ЗТВ1 совпадает с цепочкой 
5ТК2. Цепочки сравниваются последовательно (литера с литерой) слева на- 
право (т. е. от меньшего индекса к большему). Число сравниваемых литер 
равно наименьшей длине из ГЕМ] и ГЕМ2. Первая же несовпавшая пара литер 
определит, какая из сравниваемых цепочек «меньше», а какая «больше». 
Если все сравниваемые литеры совпали, цепочки равны между собой при ра- 
венстве длин цепочек. Если длины цепочек не равны, но все литеры совпадают, 
цепочка с наименьшей длиной считается «меньшей». (Замечание. Можно на- 
писать одну функцию с несколькими входами.) 


3.05. Напишите программу, выполняющую частичное моделирование шахмат- 
ной игры. Рассмотрите игру на доске 8Х 8. Ваша программа должна случай- 
ным образом выбирать три клетки для расстановки ферзя, слона и ладьи (это 
фигуры вашего партнера) и одну клетку, где должен стоять ваш конь. Напе- 
чатайте расположение фигур на доске, используя для изображения четырех 
фигур следующие обозначения: Ф (ферзь), С (слон), Л ( ладья) и К (конь). 
Затем проанализируйте клетки, на которые ваш конь может пойти. Пометьте 
эти клетки: 


| — Если конь может туда пойти, но будет побит одной из фигур партнера 
на следующем ходе. 

2 — Если конь может пойти и не будет побит ни одной из фигур партнера на 
следующем ходе. 

3 — Если конь может этим ходом взять какую-либо фигуру партнера. 


Выведите на печать изображение доски с расположением фигур. Вспомните, 
что ферзь может перемещаться в любых направлениях — по горизонтали, 
вертикали и диагонали. Слон может перемещаться в любых направлениях 
только по диагонали, а ладья — по горизонтали и вертикали. Конь ходит 
на две клетки по горизонтали и одну по вертикали или на две клетки по верти- 
кали и одну по горизонтали. 


3.06. Один из методов определения ‘авторства анонимных литературных произ- 
ведений состоит в следующем. Вначале подсчитываются все слова анализируе- 
мого документа и строится таблица относительной частоты появления (в про- 
центах) каждого слова. Затем эти проценты сравниваются с процентами из 
таблиц, построенных по известным произведениям предполагаемых авторов. 
Напишите программу, которая вводит часть текста и выделяет все слова в этом 
тексте (игнорируя знаки пунктуации и используя один или несколько пробе- 
лов в качестве разделителей между словами). Ваша программа должна печатать 
абсолютную и относительную частоту появления каждого слова в тексте. 


3.07. Выравненным по правому краю текстом называется текст, в котором 
правые и левые края строк выравнены. Напишите процедуру, которая вводит 
строку текста и вставляет достаточное количество дополнительных пробелов 
между словами, чтобы подогнать строку до определенной длины. 


3.08. (Для тех, кто имеет возможность работать в интерактивном режиме). 
Одной из интересных демонстрационных игр является старинная детская игра 
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в отгадывание слов. Игра состоит в следующем. Задумывается какое-нибудь 
слово и на дисплей выводятся черточки, по одной на каждую букву этого 
слова. Участник игры угадывает буквы слова. Если он угадал какую-нибудь 
букву, она высвечивается в той позиции (в тех позициях), в которой она стоит 
в слове. В любое время участник может попытаться угадать все слово. Цель 
игры состоит в том, чтобы определить выбранное слово при наименьшем числе 
попыток. Напишите программу этой игры. (Кстати, эта игра, конечно, с более 
трудными словами приводит в восторг даже взрослых.) 


Глава 4 


ВВОД/ВЫВОД: МАГНИТНЫЕ ЛЕНТЫ И ДИСКИ 


Оперативная память ЭВМ — это та среда, в которой запоми- 
наются программа, ее данные, результаты вычислений, строки, 
подготовленные для форматной печати. К каждому элементу дан- 
ных внутри оперативной памяти существует прямой доступ. 
В языке Фортран такой доступ выполняется путем ссылки на 
элемент по его имени. Запись и чтение данных выполняются с 
очень болыпой скоростью, обычно превышающей миллион слов 
в секунду. 

Однако на большинстве ЭВМ размер оперативной памяти 
довольно ограничен. Как следствие, количество оперативной 
памяти, выделяемой для программы, может оказаться недоста- 
точным для хранения всех данных, которые должны быть одно- 
временно доступны программе. Рассмотрим, например, програм- 
му, которая должна читать, сортировать и затем печатать фами- 
лии и почтовые адреса 15 000 человек. Если длина одной записи 
имени/адреса составляет 80 литер, то потребовалась бы память 
емкостью более миллиона байтов, чтобы запомнить данные 
для этой программы. Сравнительно немногие машины могли бы 
выделить так много оперативной памяти для отдельной про- 
граммы. Поэтому необходимо добавить к оперативной памяти 
менее дорогую память для того, чтобы разрешить проблемы 
подобного сорта. 

Второй недостаток оперативной памяти — короткое время 
жизни данных, которые в ней могут храниться. После того как 
выполнение программы закончилось, выделенная ей оператив- 
ная память должна быть отдана другим программам. Поэтому 
любые значения, которые остаются в этой памяти, будут испор- 
чены. Вернемся вновь к задаче о почтовых адресах. Что, ‚если 
бы мы захотели сохранить указанные 15 000 отсортированных 
образов перфокарт для повторных распечаток? Можно было бы 
вводить снова исходную колоду карт, но для этого потребовалось 
бы каждый раз выполнять сортировку. Вспомнив, что сортиров- 
ка 15 000 элементов требует в среднем около 200 000 сравнений 
(15 000 + 105, (15 000)), мы вынуждены отвергнуть такое решение. 
Можно было бы отперфорировать отсортированную колоду пер- 
фокарт, но для 15 000 карт понадобилось бы 7,5 коробки. 
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Чтобы решить проблемы, возникающие при использовании в 
качестве ‘носителя данных только перфокарт и оперативной 
памяти, в большинстве ЭВМ предусматриваются другие устрой- 
ства хранения информации. Обычно широко используют два 
класса таких устройств: устройства, предназначенные для обра- 
ботки данных в строго фиксированном порядке {с последователь- 
ным доступом), и устройства, которые обеспечивают обработку 
в произвольном порядке (с прямым доступом). Вслед за устрой- 
ствами, работающими с единичными записями, такими, как 
устройство ввода с перфокарт, АЦПУ и др., наиболее широко 
распространенным устройством с последовательным доступом 
служит магнитная лента. Устройства хранения данных на маг- 
нитных дисках составляют наиболее общеупотребительный класс 
устройств с прямым доступом. Мы обсудим организацию и ис- 
пользование магнитных лент в последующих трех разделах; 
дисковые устройства рассмотрены в разд. 4.4 и 4.5. 


‘4.1. Физическая организация магнитных лент 


4.1.1. Запись данных 


Бобины магнитных лент подобны тем, что используют на быто- 
вых магнитофонах. Стандартная бобина умещает магнитную 
ленту длиной 2400 футов (ок. 730 м). Ширина ленты обычно до- 
статочна для параллельной записи 9 битов данных. При принятом 
методе записи намагниченность в одном направлении означает 
двоичную единицу, а в другом направлении — нуль. Обычно 
данные записаны на 7 или 9 параллельных дорожках (ленты на- 
зываются соответственно 7-дорожечной и 9-дорожечной). В любом 
случае число битов достаточно для кодирования одиночной ли- 
теры. | 

К коду каждой записываемой литеры добавляется бит, назы- 
ваемый битом четности. Поэтому для записи б-разрядных литер 
в коде ВСО требуется 7-дорожечная лента, а для 8-разрядного 
кода ЕВСО[С — 9-дорожечная. Для записи 7-разрядных литер в 
АЗСПИ необходимо только 8 дорожек, поэтому на 9-дорожечной 
магнитной ленте один разряд всегда установлен в 0. 

Наиболее распространенное применение разряда четности — 
контроль на нечетность. Если число единичных битов в литере 
четное, то разряд четности устанавливается равным 1; в против- 
ном случае — 0. Использование этого способа гарантирует, что 
каждая записанная на ленту литера содержит нечетное число 
битов, равных единице. 

При записи данных на ленту для каждой литеры вычисля- 
ется бит четности и затем приписывается к ее коду. При чтении 
данных происходит проверка на нечетность кода, т. е. выясня- 
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ется, не произошла Ли ошибка. Такой контроль позволяет об- 
наружить ошибку в одном разряде, но нельзя обнаружить 
ошибки, произошедшие одновременно в двух разрядах. 

Цепочка литер представлена на ленте записью из следующих 
друг за другом литер. Между записанными на ленту литерами, 
т. е. между первой закодированной литерой и второй, между 
второй и третьей и т. д., имеются, конечно, интервалы (чистые 
участки ленты). Интервал примерно одинаков для любых данных, 
записанных на одной бобине, но для различных лент интервалы 
могут быть разными. Плотность, с которой литеры упакованы 
на ленте, обычно составляет 6250, 1600, 800, 556 или 200 литер 
на дюйм. Эти плотности обычно обозначают как 6250, 1600, 800, 
556 и 200 6рЕ, где Бр — это сокращение от 61$ рег 1тсй (бит на 
дюйм). Так как все биты одиночной литеры расположены на 
ленте параллельно, то «бит на дюйм» равнозначно «литер на 
ДЮЙМ». | 

Емкость магнитной ленты зависит от ее длины и плотности 
записи. Магнитная лента длиной 2400 футов с плотностью за- 
писи 1600 Бр: может хранить более 45 миллионов литер данных; 
только половину от этого количества — при плотности записи 
800 БрЕ. При выборе плотности записи приходится идти на ком- 
промисс, поскольку, чем выше плотность, тем больше вероят- 
ность записи с ошибками (особенно на старых лентах) и выше сто- 
имость устройств записи. 

При необходимости записи на ленту более одного блока дан- 
ных (цепочки литер) между блоками оставляют промежуток, 
чтобы различить отдельные блоки. Промежуток представляет 
собой чистый участок ленты. Длина промежутка обычно нахо- 
дится в пределах между 1/2 и 3/4 дюйма. Наличие этих проме- 
жутков снижает полезную емкость лент. 

Рассмотрим, что произойдет, если мы заполним магнитную 
ленту длиной 2400 футов 80-литерными образами перфокарт. 
При использовании плотности записи 1600 ФрЁ каждый блок 
занимает только 1/20 дюйма. Предположим, что промежуток, 
разделяющий блоки, имеет длину 1/2 дюйма. Тогда эффективная 
плотность составит 80 литер на 11/20 дюйма, или, что то же, 
146 литер на дюйм. Следовательно, используется только 9% 
ленты. Однако если записывать по 3200 литер в блоке, каждый 
из которых содержит 40 образов карт, то эффективность исполь- 
зования Ленты составляет примерно 80% (рис. 4.1). 

Метод записи более чем одного элемента данных на блок на- 
зывают блокированием. Каждый отдельный элемент данных в 
блоке называется логической записью, а каждый блок — физиче- 
ской записью. Данные считаются несблокированными, если каж- 
дая физическая запись включает только одну логическую запись. 
В основном данные, записанные на ленту, сблокированы, так 
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как применение больших физических записей обеспечивает 
высокий процент эффективного использования ленты. Как мы 
увидим позднее, блокирование также уменьшает время, требуе- 
мое для чтения или записи данных. 


1/20 дюйма 1/одюбма 1/20 Зюйма 4 /2 Зюйма 1/20 дюйма 1/2 дюйма 1/20 дюйма 


^^ 


(<) Несблокированные образы карт 


2. дюйма 1/2 дюйма 


/ | \/—^— 
Карта1 | Карта2 ! ® ® ® | Карта 40 | пром. | Карта 41 


(6') Образы 40 карт 6 одном блоке 


Рис. 4.1. Сблокированные и несблокированные записи. 


Хотя блокирование данных имеет много достоинств, за них 
приходится платить. Для операций ввода или вывода внутри 
программы должна быть выделена достаточная область опера- 
тивной памяти, чтобы разместить как минимум одну физичес- 
кую запись. (В большинстве случаев в памяти нужно хранить 
две или более физических записей.) Поэтому, если мы выбираем 
слишком большой размер блока, может не хватить памяти для 
выполнения программы. С другой стороны, если размер блока 
слишком мал, то большая часть ленты заполняется не данными, 
а промежутками. 

К сожалению, нет магической формулы, которая диктовала 
бы оптимальный размер физической записи. Выбор должен ос- 
новываться на таких факторах, как количество обрабатываемых 
данных и размер области памяти, отводимой для программы. 
Часто принимаются в расчет и другие моменты, однако это уже 
выходит за рамки данной книги. Мы будем использовать физиче- 
ские записи размерами в диапазоне от 600 до 4000 литер. Такой 
диапазон обычно приемлем для программ, выполняемых в не- 
большой области памяти и не требующих хранения больших 
объемов данных. 


4.1.2. Записи фиксированной и переменной 
длины 


На Фортране можно выводить в один и тот же файл на маг- 
нитной ленте записи различной длины. Изменением длины записей 
обычно управляют одним из трех методов. 
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8/20 исп.  |пром. | 20/20 исп. |пром. | 2/20 исп. |пром.| 4/20 исп. 


(&) Несблокированные логические записи 


8/20 исп. | 20/20 исп. пром. 2/20 исп. |! 4/20 исп. . 


(б’) Логические записи 8 блоках по 98е 


Рис. 4.2. Короткие записи, дополненные пробелами. 

Рисунок иллюстрирует, как записи небольшой длины записываются с исполь- 
зованием пустых литер. Предполагается, что максимальный размер логичес- 
кой записи равен 20. На ленту выводятся четыре записи — длиной 8, 20, 2 


и 4. 
блитер @@@ё... 


Рис. 4.3. Записи, в которых используются концевые маркеры. Рисунок показы- 
вает, как в системе ОЕС-10 хранятся записи с использованием маркера конца 
записи. Предполагается вывод четырех записей — длиной 8, 20, 2 и 16; каж- 
дая физическая запись имеет длину 10 слов (50 литер). Знак цента (@) обозна- 
чает конец записи. Все записи дополнены до длины, кратной о (5 литер — это 
одно слово), посредством «пустых» литер (они обозначены через @)). 


8 литер © 20литер @е@е@р 2питеры @@ф 10 литер пром. 


- 


4-питерное поле, указывающее длину блока. Эти поля содержат значения 16, 28, 10 и 12, 
соответственно 


| | р 
| | 20 питер И 4 лутеры 
| 


4-питерное поле, указывающее длину записи. Эти поля содержат значения 12,24, 6и8, 
| соответственно 
(<) Несбпокированные записи 


4-питерное поле, указывающее длину блока. Эти поля содержат значения 40 и 18, соответственно 


20 литер | 4 питеры 


4-питерное поле, указывающее длину записи. Эти поля содержат значения 12, 24. 6 и 8, 
соответственно 


(6’) Сбиокированные записи 
Рис. 4.4. Записи переменной длины с использованием управляющих слов — 


система ВМ. На рисунке показано, как хранятся записи переменной длины. 
Здесь изображены 4 записи длиной 8, 20, 2 и 4. 
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3! 2 слова 1416] Белов 21! 1 слово 


Рис. 4.5. Записи переменной длины с использованием управляющих слов — 
система РЕС-10. 

1. Стартовое слово первой записи. Указывает, что запись плюс стартовое сло- 
во занимают 3 слова. | 

2. Концевое слово первой записи. Указывает, что запись плюс стартовое и 
концевое слово занимают 4 слова. 

3. Стартовое слово второй записи. Указывает, что первые 5 слов этой записи 
хранятся в данном блоке. Число 6 включает также стартовое слово. 

4. Слово продолжения второй записи. Указывает, что далее следует оставшее- 
ся одно слово из записи номер 2. Число 2 включает также слово продолжения. 
5. Концевое слово второй записи. Указывает, что в записи 9 слов, включая 
стартовое, концевое и слово продолжения. 

6. Стартовое слово третьей записи. Указывает, что запись плюс стартовое сло- 
во занимают 6 слов. 

7. Концевое слово третьей записи. Указывает, что запись плюс стартовое и 


ме 


концевое слова занимают 7 слов. 

Рисунок показывает, как хранятся записи на ленте в системе ОЕС-10 с ис- 
пользованием управляющей информации. На ленте три записи — длиной 2, 
6 и 5 слов. Длина каждой физической записи 10 слов. 


Первое и самое простое решение состоит в том, чтобы всегда 
выводить Логические записи некоторой фиксированной длины, 
которая равна наибольшей возможной длине записи. Данные 
занимают крайние левые позиции в логической записи, остаток 
заполняется «пустыми» литерами (например, пробелами). Этот 
метод проиллюстрирован на рис. 4.2. 

Второе решение предполагает, что за каждой записью сле- 
дует распознаваемый символ конца записи. При использовании 
этого метода можно упаковывать более одной логической записи 
в одном блоке. Можно даже разместить одну логическую запгсь 
в нескольких блоках, поскольку наличие маркера конца записи 
позволяет обнаруживать конец логической записи независимо 
от границ физической записи. Рис. 4.3 иллюстрирует, как кон- 
цевые маркеры используются в системе РЕС-10. 

Третье решение — выводить записи, которым предшествуют 
некоторые управляющие литеры, определяющие фактическую 
длину данных. Системы ОС 1ВМ 360-370 и РЕС-10 используют 
этот метод для определенных типов выводных записей. Рис. 4.4 
иллюстрирует метод применения записей переменной длины 
в машинах фирмы ВМ. На рис. 4.5 показано, как этот метод 
реализован в системе РЕС-10. 
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4.1.3. Проблема обновления записей 


Если мы используем магнитную ленту для хранения данных, 
по которым, например, начисляется зарплата служащих, то 
может возникнуть необходимость заменить данные, хранящиеся 
в каком-то блоке, новой информацией. Если новый блок имеет 
ту же самую длину, что и старый, можно записать его непосред- 
ственно на место заменяемого блока. Такой процесс, который 
обычно называют обновлением по месту, не всегда может осуще- 
ствляться успешно. 


(<) Пента. до обновиения ЗАПИСИ ] 


вы [иж Кови [иж 
Промежуток длиннее, Минимальная длина, 
чем до обновления необходимая для промежутка 


(б’) Промежуток перед ЗАПИСЬЮ } слишком длинный 


Промежуток короче, Оставшаяся часть 
чем до обновления старой ЗАПИСИ ] 
Новый промежуток между ЗАПИСЬЮ } 
ц ЗАПИСЬЮ }+1 >— 


(8) Промежуток перед ЗАПИСЬЮ ] слишком короткий 


Часть ЗАПИСИ }+1, 
перекрывшая часть 
промежутка. 


Старый промежуток 
между ЗАПИСЬЮ } 
ц ЗАПИСЬЮ }+1 


Рис. 4.6. Обновление записей на ленте. 


Существо проблемы, связанной с переписью блока, состоит в 
том, что записывающие головки не могут быть установлены 
в точности так же, как при записи старого блока. В результате 
этой неточности концевая часть старого блока окажется нестер- 
той или получится слишком малый промежуток между новым и 
следующим за ним старым блоком (рис. 4.6). Вследствие этого 
после переписи блока все последующие блоки оказываются не- 
доступными для чтения. 
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4.1.4. Файлы данных 


Группу связанных по смыслу записей, хранящихся на маг- 
нитной ленте, называют файлом (или в некоторых случаях на- 
бором данных). Одна бобина может содержать более одного 
файла. Действительно, магнитная лента имеет такую большую 
емкость, что обычно на нее записывают несколько файлов. 
Каждый файл на ленте оканчивается специальным маркером, на- 
зываемым конец файла. За последним файлом на ленте следует 
маркер конца тома (в некоторых системах он представляется 
двумя последовательными маркерами конца файла). 

На многих установках файлы можно помечать метками. Это 
означает, что непосредственно перед (а в некоторых случаях 
непосредственно за) каждым файлом располагается набор запи- 
сей, называемых в совокупности меткой. Информация, записан- 
ная в метке, неодинакова в различных системах, но обычно вклю- 
чает: выбранное пользователем имя файла, которое должно 
быть известно тому, кто хочет прочитать файл; длину физиче- 
ских записей, содержащихся внутри файла; длину логических 
записей, из которых состоит каждая физическая запись. 

Методы, посредством которых программа может определить, 
какой файл многофайловой ленты подлежит обработке, рассмо- 
трены в разд. 4.3. Эти методы не являются частью Фортрана и 
специфичны для конкретной вычислительной системы. 


4.1.5. Физические характеристики магнитной 
ленты 


Устройства, которые читают данные с магнитных лент или 
записывают их на ленту, называются лентопротяжными устрой- 
ствами (или магнитофонами, или лентопротяжками). Эти устрой- 
ства имеют две оси для установки бобин с магнитной лентой. 
На одну ось устанавливают бобину с лентой, на другую — прием- 
ную пустую бобину. При обработке лента с первой бобины пе- 
рематывается под головкой чтения/записи на приемную бобину. 

Когда на устройство приходит запрос на чтение или запись, 
магнитная лента начинает двигаться мимо головки чтения / за- 
писи. Чтение или запись не начинается, пока лента не наберет 
полной скорости движения, которая обычно составляет от 75 до 
125 дюймов в секунду. Такая скорость достигается после того, как 
лента продвинулась примерно на половину длины промежутка. 

Если выполняется операция чтения, перед головкой чтения / 
записи должна находиться середина промежутка, предшествую- 
щего считываемому блоку данных. Когда начинается движе- 
ние, головка чтения/записи следит за содержимым перематы- 
ваемой магнитной ленты, ожидая начала данных. Как только 
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первая литера, расположенная за промежутком, будет обнару- 
жена, начинается чтение. Чтение продолжается до тех пор, пока 
не будет обнаружено начало следующего промежутка. Ленто- 
протяжное устройство постепенно замедляет ход, останавливаясь 
примерно посредине этого промежутка. 

При выполнении операции записи головка чтения/записи 
должна находиться примерно в середине промежутка, располо- 
женного после предшествующего блока. Головка чтения/записи 
стирает участок ленты во время пускового периода. Таким путем 
образуется необходимый промежуток перед новым блоком. 
Когда лента набирает полную скорость, записывается блок дан- 
ных. После того как записана последняя литера, лента постепенно 
замедляет ход до полного останова. Во время этого периода 
головка чтения/записи стирает соответствующий участок, тем 
самым обеспечивая необходимый промежуток, отделяющий только 
что записанный блок от любой информации, которая может за 
ним последовать. 

При выполнении операций на устройствах магнитной ленты 
возникают две проблемы. Первая из них связана с обновлением 
блоков на месте; она была рассмотрена в разд. 4.1.3. Вторая 
проблема касается длины блоков. При выполнении операции 
чтения предполагается, что считываемая головкой информация 
должна иметь некоторую минимальную длину, чтобы ее можно 
было интерпретировать как блок данных; в противном случае 
участок интерпретируется как «шум», вызванный работой ленто- 
протяжного механизма или ошибкой записи. Минимальная длина 
физической записи отлична для разных устройств на магнит- 
ных лентах. Опыт, однако, показывает, что никогда не следует 
писать блоки длиной менее 20 литер. 


4.1.6. Скорость передачи данных на магнитной ленге 


К данным, находящимся в оперативной памяти ЭВМ, может 
быть обеспечен доступ с очень большой скоростью; для совре- 
менных больших ЭВМ эта скорость составляет более 4 миллионов 
литер в секунду. Скорость передачи данных на ленту и с ленты 
значительно меньше. Рассмотрим ленту с плотностью записи 
800 бр и устройство, которое перемещает ленту со скоростью 
75 дюймов в секунду. Если пренебречь временем начала движения 
и останова ленты, то можно считать, что данные передаются на 
ленту или с ленты со скоростью 60.000 литер в секунду. 

Скорость передачи данных на ленте, хотя и меньше, чем в 
оперативной памяти, но значительно больше, чем скорость ввода 
данных с перфокарт. (Типичная скорость ввода с перфокарт — 

1000 карт в минуту, или 1333 литеры в секунду.) 
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4.2. Инструкции Фортрана для работы 
с магнитной лентой 


Каждая обрабатываемая программой на Фортране магнитная 
лента связана с некоторым номером канала. Выбор доступных 
номеров каналов и способы, посредством которых данная лента 
ассоциируется с каким-либо номером канала, коренным образом 
различаются для различных ЭВМ. В разд. 4.3 этот вопрос рас- 
смотрен более детально. Здесь мы будем использовать имена 
вида ТАРЕх (где х — целое число) при каждом обращении к 
устройству на магнитной ленте. Соответствующее значение для 
указанных переменных должно быть задано до того, как пред- 
ставленные здесь сегменты программы могут быть скомпилиро- 
ваны. | 

Для работы с магнитными лентами в языке Фортран преду- 
смотрено семь инструкций. К ним относятся: форматные ин- 
струкции КЕАО и \ВПТЕ, бесформатные КЕАО` и УКПТЕ, 
инструкции ВАСКЗРАСЕ, ЕМРЕШЕ и КЕМПУО. 


4.2.1. Форматный ввод/вывод на магнитной ленте 


Форматные инструкции КЕАО и \ЕГТЕ для работы с маг- 
нитными лентами записывают точно так же, как аналогичные 
инструкции ввода с перфокарт и вывода на печать; эти инструк- 
ции отличаются только номерами каналов. 

Выполнение инструкций 


\УЕТЕ (ТАРЕ!, 4000) (АГРНА (1), 1=1, 100) 
4000 ЕОВМАТ (100А1) 


обеспечивает создание 100-литерной логической записи и вывод 
ее на магнитную ленту устройства, обозначенного через ТАРЕ]. 
Если записи не блокируются, данная отдельная логическая 
запись выводится как одна физическая запись. Если выполня- 
ется блокирование, то система обеспечивает слияние данной 
логической записи с другими записями, выводимыми на магнит- 
ную ленту. Операции по блокированию обычно скрыты от про- 
граммиста. 

Логические записи файла на магнитной ленте могут быть 
считаны только в том порядке, в котором они были записаны 
на ленту. Поэтому, если, например, мы хотим прочитать пятую 
логическую запись, необходимо вначале считать четыре преды- 
дущие записи. Предполагая, что головка чтения/записи уста- 
новлена точно перед записью номер 1, можно добиться желае- 
мого результата посредством инструкций 


ВЕАШ (ТАРЕГ, 3000, ЕМР=999) (АЕРНА (1), 1=1,50) 
3000 ЕОКМАТ ////, 5041) 


У № 2048 
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Первые четыре слэша в формате позволяют прочесть и проигнори- 
ровать первые четыре записи. Поскольку список в формате пол- 
ностью еще не исчерпан, считывается пятая запись. Если пятая 
запись содержит 50 или более литер, то первые 50 литер будут 
присвоены первым 50 элементам массива АГРНА, а любые остав- 
‘шиеся в записи литеры игнорируются. Если запись короче 
50 литер, будет выдано сообщение об ошибке точно так же, 
как если бы мы попытались ввести 100 литер с 80-колонной 
перфокарты. В некоторых ЭВМ это приводит к «фатальной». 
ошибке; в других происходит считывание следующей записи и 
значения, взятые из нее, используются для завершения опера- 
ции чтения. 

Предыдущая инструкция КЕАШ содержит необязательный 
параметр ЕМР =. Его применяют точно так же, как и в ин- 
струкции чтения перфокарт для обнаружения конца данных. 
В данном случае, если маркер конца файла, будет обнаружен до 
пятой записи, то произойдет переход к инструкции с меткой 999. 


4.2.2. Бесформатный ввод/вывод на магнитной ленте 


При выполнении форматной инструкции \/ЕТЕ значения 
данных, выдаваемых их оперативной памяти, преобразуются в 
соответствии с указанными форматными кодами. Часто формат- 
ная версия вещественных, целых или логических переменных 
требует больше литер, чем располагается в одном слове (длина 
внутреннего представления переменной). Например, если пере- 
менная записывает без форматного преобразования, она занимает 
четыре литеры в системе [ВМ 360-370 и пять литер в РЕС-10. 
Однако если значение такой переменной записано с использова- 
нием форматного кода 19, то переменная будет представлена 
девятью литерами. Потребность в лишнем пространстве наряду 
с затратами времени и потерей точности, связанными с формат- 
ным преобразованием, может быть преодолена путем применения 
бесформатных инструкций чтения и записи. 

: Для того чтобы упаковать данные, записываемые на магнит- 
ную ленту, можно использовать бесформатную инструкцию 
М/КГТЕ. Общая форма инструкции: 


МУЮТТЕ (номер канала) список вывода 
Отсутствие номера формата определяет, что инструкция 


бесформатная. 
Выполнение инструкции 


М/ЕГТЕ (ТАРЕ!) (1.1$Т (1), 1=1,200) 


приводит к записи на ленту без форматного преобразования 
200 слов, содержащих первые 200 элементов массива Г$Т. 
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На машинах серий [ВМ 360-370 логическая запись для приведен- 
ной инструкции содержит 800 литер. На ЭВМ РЕС-10 запись 
займет 1000 литер. В противоположность этому логическая за- 
пись, созданная инструкциями 


\"ЕГТЕ (ТАРЕП, 3000) (Г15Т(П, 1=1,200) 
3000 ЕОЕМАТ (20019) 


имеет длину 1800 литер. 

Логические записи, которые были выведены на ленту с при- 
менением бесформатной инструкции \УКТЕ, следует читать 
посредством бесформатной инструкции КЕАР. Общая форма 
этой инструкции: 


КЕАО (номер канала [,ЕМ)=метка]) [список ввода] 


Список ввода определен в инструкции как необязательный. Его 
можно опустить, если желательно пропустить запись. Поэтому 
инструкция 


КЕАР (ТАРЕ!) 


пропускает одну логическую запись на ленте, ассоциированной 
с каналом ТАРЕ1. 

Хотя использование бесформатного ввода/вывода обычно 
считают выгодным, это не всегда так. Например, предположим, 
что мы хотим вывести на ленту логическую запись, содержащую 
значения 500 целых чисел — элементов массива А, и мы уверены, 
что все элементы имеют значения между 0 и 99. Форматный вывод 


\УЕПТЕ (ТАРЕ!, 4000) А 
4000 ЕОЕМАТ (50012) 


обеспечит вывод на ленту записи длиной 1000 литер. Бесформат- 
НЫЙ ВЫВОД 


\ВТЕ (ТАРЕ!) А 


также обеспечивает. вывод на ленту, но здесь запись будет содер- 
жать 2000 литер для машин серий 1ВМ 360-370 и 2500 литер для 
ЭВМ РЕС-10. Наверное, в этом случае лучше выбрать форматный 
ВЫВОД. 

Форматный вывод необходим, когда лента должна читаться 
на машинах различных типов. Это связано с тем, что при бес- 
форматном выводе данные представлены во внутреннем коде 
машины, который распознают только данная и подобные ей 
ЭВМ. Однако если мы используем форматный вывод, то магнитная 
лента может быть прочитана на двух ЭВМ с тем же самым литер- 
НЫМ КОДОМ (например, АЗСИ, ВСО или ЕВСОТС). 


7* 
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4.2.3. Инструкцил ВАСК5РАСЕ 


Инструкцию ВАСК$РАСЕ, по-видимому, можно представлять 
себе как инструкцию реверса лентопротяжного механизма, чтобы 
обрабатывать только что записанную информацию. Поэтому, 
если выполняется инструкция вида 


ВАСК$РАСЕ номер канала 


то следующей обрабатываемой логической записью будет запись, 
предшествующая той, которая была бы доступна в данный мо- 
мент в отсутствие этой инструкции. Поэтому, например, первое 
чтение ленты 
КЕАО {ТАРЕ!, 30001 АСТ)» {=1,30) 
3000 ЕРОВМАТ (3013) 


ВАСК$РАСЕ ТАРЕТ 
ВЕАО (ТАРЕ1!, 3000) (ВЕТ) » 121,30) 


вызывает чтение логической записи, и первые 90 литер этой 
записи обрабатываются как 30 последовательных полей в формате 
[3. Значения указанных полей размещаются в первых 30 эле- 
ментах массива А. Команда ВАСК$РАСЕ указывает, что при 
следующем чтении должна обрабатываться та же самая логичес- 
кая запись, которая только что была считана. Поэтому первым 
30 элементам массива В будут присвоены те же самые значения, 
которые были присвоены элементам массива А. 

Инструкция ВАСКЗРАСЕ не выполняет никаких действий 
в случае, когда лента установлена на чтение первой записи файла. 
Ясно, что нет смысла задавать обратное движение ленты от этой 
точки. 


4.2.4. Инструкция ЕМОРШЕ 


`После того как в файл на магнитной ленте записаны все 
записи, должен быть записан маркер конца файла. В. Фортране 
‘для этого используют инструкцию 


ЕМРЕП.Е номер канала 


4.2.5. Инструкция КЕМ/ИМО 


Общая форма инструкции КЕ\М/УПМО (перемотать): 
ВЕ\М/ПМО номер канала 


Эта инструкция выполняется после окончания всей обработки 
файла. Кроме того, КЕ\М/ПУО следует задавать всегда, когда 
необходимо вновь установить головку чтения/записи на логиче- 
ское начало ленты. (Определение логического начала ленты раз- 
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личается для разных вычислительных систем. На машинах 
]ВМ 360-370 это означает начало обрабатываемого файла. На 
РЕС-10 — начало первого файла на ленте.) 

Магнитные ленты обычно используются для длительного хра- 
нения программ и данных. На рис. 4.7 приведена программа, 


Скука 
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Рис. 4.7. Программа, копирующая карты на ленту. (Текст в инстр. 25: «Содер- 
жимое файла на ленте.») 


которая копирует входную колоду перфокарт на ленту, перема- 
тывает ленту и выводит на печать ленточный файл для докумен- 
тирования его содержания. В приведенном примере опущены де- 
тали того, как ассоциируется номер канала в фортранной про- 
грамме с действительным устройством на магнитной ленте. Сле- 
дующий раздел дает некоторое представление о том, как это де- 
лается в системах ОЗ ВМ 360-370 и РЕС-10. 


4.3. Работа с магнитными лентами: системы 
ВМ и ОЕС 


Предположим, что мы правильно написали программу, обра- 
батывающую файл на магнитной ленте. Чтобы выполнить эту 
программу, необходимо знать соглашения, принятые на вашей 
ЭВМ. Эти соглашения могут существенно отличаться для раз- 
личных машин и обычно незначительно отличаются для машин, 
использующих одну и ту же операционную систему. 
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В следующих двух подразделах рассмотрены примеры того, 
как номера каналов в программах на Фортране могут быть ас- 
социированы с файлами на магнитных лентах. Эти примеры от- 
носятся к системам [ВМ 360-370 и РЕС-10. 


4.3.1. Назначение устройствам в системе 1ВМ О5//СЁ 


На машинах ВМ серий 360-370 для управления операциями 
используются два принципиально различных языка. 
Это ОЗ/ЛСЕ и РОЗ/ЛСЕЬ (0$ — ОрегайпЕ зует, операцион- 


ная система; РОЗ — дисковая операционная система; УСЁ -— 
Лоб Сопйго! Гапвиаре, язык управления заданиями). 


О$/ЛСГ, — это язык управления, используемый в основном 
на болыших машинах ВМ 360-370. В этом языке устройствам 
назначают номера посредством команд, называемых командами 
определения данных (ОРО-команды). Поскольку некоторые аспек- 
ты спецификаций в Ор-командах зависят от соглашений, при- 
нятых в конкретном вычислительном центре, мы здесь опустим 
много вопросов (например, расположение РО-команд в колоде 
перфокарт). Ограничимся лишь той информацией, которая при- 
менима в большинстве случаев, и отметим места, где вступают в 
силу локальные соглашения. 

Ор-команды, связанные с выполнением программ на Фортра- 
не, имеют следующую форму: 


/Нимя-шага]Е'ТнкЕО01 ОО операнды 


Две наклонные черты // должны быть пробиты в 1-й и во 
2-й колонках перфокарты; их используют для указания того, 
что данная перфокарта содержит команду Языка управления 
заданиями (СГ). Номер канала в программе на Фортране, к 
которому мы хотим подключить физическое устройство, обозна- 
чен через нк. 

Цепочка литер имя-шага определяет шаг задания; соглашения 
о ее форме различны для различных ВЦ, а иногда она может быть 
даже опущена. Вам следует узнать, нужно или нет задавать имя 
шага, и если нужно, то как. 

Поле операнды представляет собой список из одного или не- 
скольких значений операндов. Два обычно используемых опе- 
ранда: 

/ЕТ11ЕО01 РО + 


И | 
//ЕТ09Е001 БО $У$ОЧТ=А 


Первый операнд (*) указывает, что номер канала (в данном 
случае 11) означает канал ввода с перфокарт. Перфокарты долж- 
ны следовать непосредственно за указанной ШОЛО-командой. 
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Сигналом для завершения ввода перфокарт из канала номер 11 
служит или отсутствие дальнейших перфокарт в данном задании, 
или следующая управляющая перфокарта. 

Во втором примере приведен операнд ЗУЗОЧТ =А. Этот опе- 
ранд объявляет, что все инструкции У\/К[ТЕ с данным номером 
канала (здесь 9) осуществляют вывод на АЦПУ. | 

Р)-команды, аналогичные только что описанным, с номерами 
каналов 5 (+) иб (ЗУЗОЧТ=А) обычно входят в ту стандартную 
часть языка управления заданиями, которая используется для 
программ на Фортране. 

Для ввода с перфокарт редко применяются номера каналов, 
отличные от 5. Однако такая возможность может быть полез- 
ной, если программа будет выполняться на других вычислитель- 
ных машинах. Например, стандартный номер канала для кар- 
точного файла в Фортране РЕС-10 не 5, а 2. Для выполнения 
программы следует вставить перед перфокартами с данными 
2О-команду 


//Е'Т02Е001 ОБО. * 


Это позволит ассоциировать с входным карточным файлом 
канал 2, а не 5. Все инструкции ввода с перфокарт следует за- 
дать в программе в форме КЕАР (2, —) —. 

Наиболее общепринятое употребление операнда ЗУЗОЧТ = А— 
разрешить программам иметь доступ к двум или более файлам 
печати. Это средство дает нам чрезвычайно гибкие дополнитель- 
ные возможности для выполнения отладки. 

Предположим, что мы написали программу, которая направ- 
ляет все отладочные сообщения в канал ОВО. Тогда инструкции 
отладочного вывода \/КТЕ имеют форму 


М/КТТЕ (ОВО, формат) список 
Теперь, если мы захотим объединить отладочный листинг с 


обычным стандартным выводом, нужно инициализировать ОВа 
посредством. инструкции 


РАТА ОВО/6б/ 


Однако, если требуется, чтобы отладочный листинг был оформлен 
как отдельная группа страниц, независимая от вывода в канал 
с номером 6, можно включить, например, инструкцию 


РАТА ОВО/9/ 
и ОО-команду. 
/ЕТо9Е001 РО $У$О0Т=А 


При выполнении программы будет создано два или более 
фаилов печати, каждый из которых представляет собой обособ- 
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ленную часть программного вывода. Поэтому, если программа 
содержала последовательность инструкций 


М\МЕВ[ТЕ(6, —) Список 1 
МЕТЕ(9, —) Список 2 
М\ЕВ[ТЕ(6, —) Список 3 


где би 9 — номера устройств печати, то мы не увидим строк, 
связанных со списком 2, между строками, относящимися к 
списку Ги списку 3. Вместо этого список 3 будет следовать за 
списком 1 в одной группе страниц, а список 2 — в другой группе 
страниц, печатаемых устройством, которое подключено к каналу 
с номером 9. 

Эффект, описанный в предыдущем абзаце, достигается за счет 
того, что все инструкции вывода \/КТЕ с номером канала 6 на- 
правляют вывод в один файл, а все инструкции с номером кана- 
ла 9 — в другой файл. На самом деле распечатка этих файлов 
выполняется после того, как выполнение программы закончи- 
лось. Следует сказать, что буферизация вывода (спулинг) приме- 
няется во многих современных вычислительных системах. 

Значения операндов О)-команд для файлов на магнитной 
ленте гораздо более сложные, чем те, что были приведены для 
файлов на перфокартах и файлов печати. Мы познакомимся с 
этими операндами на ряде примеров, а затем кратко опишем 
назначение каждого используемого операнда. Здесь не делается 
попытки дать исчерпывающего изложения этого вопроса. При- 
веденные здесь сведения помогут лишь ознакомить вас с основ- 
ными принципами. Более детальную информацию о ОО-командах 
можно найти в соответствующих руководствах фирмы ВМ и 
документации, имеющейся в вашем вычислительном центре. 


Пример 1. Предположим, что мы хотим подключить к кана- 
лу 12 файл, имеющий следующие характеристики: 

1. Файл должен быть записан на 9-дорожечную магнитную 

ленту [ОМТ=ТАРЕ]. 

2. Магнитная лента идентифицирована именем НОСНЕ$ 
[УОГ.=$ЕК =НОСНЕ$З$]. 
Файл должен быть создан при выполнении данного задания 
[21$Р=МЕМ!]. 
Файл помечен и должен быть первым файлом, записанным 
на данную магнитную ленту ПАВЕГ=1]. 
Файл должен иметь имя МУРАТА [2$М№=МУРАТА)]. 
Файл записывается посредством форматной инструкции 
М/ВГТЕ. Каждая запись имеет длину не более 100 литер. 
Все логические записи, выводимые на ленту, должны быть 
фиксированной длины по 100 литер. Каждый физический 
блок должен содержать 20 логических записей [РСВ= 


эл в» в 
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(РКЕСЕМ=ЕВ,ГВЕСГ =100,ВГК$17Е=2000)]. Тогда необ- 
ходимая Ор-команда будет иметь вид 


1/ЕТ12Е001 00 ИМТ=ТАРЕ» МОЕ =$ ЕВ =НИСбНЕ$ , ОТЗР=МЕМ АВЕ =1» 
// О$М=МУРАТА, ОСВ= ( ВЕСЕМ=РВ ВЕСЬ =100, 81 К5 12Е=2000} 


Заметим, что, поскольку управляющие перфокарты (ТСГ.-карты) 
могут содержать информацию только до 71| колонки (а не до 
72, как карты Фортрана), необходимы две такие перфокарты. 
Чтобы продолжить О)-команду, просто прерывают ее на запя- 
той, следующей за каким-либо операндом, пробивают код // в 
колонках | и 2 следующей перфоркарты, пропускают как мини- 
мум 3 пробела и затем набивают оставшиеся операнды, начиная 
не дальше, чем с 16 колонки. 


Пример 2. Метод, использованный в примере 1, требует, 
чтобы логические записи были всегда длиной 100 литер. Если же в 
записи содержится меньше данных, то она дополняется «пустыми» 
литерами (пробелами). Поэтому мы попытаемся переделать этот 
пример таким образом, чтобы записи выводились без дополняю- 
щих пустых литер. Для этого необходимо, чтобы блоки были пере- 
менной длины, как показано на рис. 4.4. В операндах ОО-коман- 
ды изменяем только ОСВ. Операнд ОСВ должен быть записан как 


РСВ=(КЕСЕМ=УВ ГКЕСГ=104,ВЕКЗТЛЕ=2084) 1 


В длине 104 учитывается 4-литерное поле, за которым следует 
поле для данных длиной до 100 литер. Длина 2084 включает 
20*+104 литер плюс еще одно 4-литерное поле. 


Пример 3. Предположим, что необходимо подключить к ка- 
налу 8 файл на магнитной ленте, описанный следующим образом: 
1. Файл записан на 9-дорожечной магнитной ленте ПОМТ = 
—=ТАРЕ]. 
Магнитная лента идентифицирована именем  СРРО1| 
[УОГ=$ЕК =СРРО1]. 
Файл уже был создан [21$Р=ОГ.О]. 
пал помечен и записан на ленте третьим файлом 1.АВЕГ. = 
=3]. 
‚ Файл имеет имя УООВРАТА [2$М№=УОЧВРАТА]. 
Логические записи содержат 350 литер, не сблокированы и 
должны быть считаны форматной инструкцией КЕАО 


[2СВ=(ВЕСЕМ=Е, ВЕСЕ. =350,В1.К$17 Е =350)]. 


д вы ю 


Необходимая ПО-команда имеет вид 


У7ЕТО8Е001, 20 ОМ1Т=ТАРЕ$УОЕ =6 Е =СРРО1 › 015 Р= ОГО АВЕ =3, 
// - ОЗМ=УОбУВОАТА, ОСВ={ВЕСЕМ=Р,ЕАЕСЬ=350,В(К$12Е=350) 
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или то же самое без операнда ОСВ. Операнд ОСВ можно опу- 
стить, так как файл УООКОАТА уже существует, и поэтому 
файл имеет метку, которая содержит значения ОСВ. 


Пример 4. Файл должен быть записан на устройство 13. 
Он характеризуется следующим образом: 
1. Файл должен быть записан на 9-дорожечную магнитную 
ленту ПОМТ=ТАРЕ]. 


Бобина идентифицирована именем КОЗЕ [УОГ=$ЕК = 
—КОЗЕ]. 
Файл должен быть создан в данном задании [2ЗР= 


—=МЕМ\]. 

Файл не помечен и является вторым файлом на этой ленте 
[ГАВЕЁГ =(2,М№1.)]. 

Записи имеют длину не более 80 литер. Записи выводятся 
бесформатными инструкциями \УКТЕ и упаковываются 
как минимум по 40 записей в блоке [РСВ=(КЕСЕМ= 
—=УВ$,.КЕСГ. =84,ВГК$Е =3364)|. 


Необходимая О)-команда записывается в виде 


п 


7/ЕТ13Е001 00 ИМ1Т=ТАРЕ» МОК =$ ЕВ =В05Е, 01 5Р=МЕН» АВЕ = (2, МЕТ 
// ОСВ= (ВЕСЕМ=УВ$ „(ВЕСи=84,ВК$11Е=3364} 


Заметим, что данные, считываемые или выводимые бесфор- 
матными инструкциями ввода/вывода, должны быть в записях 
переменной длины. Поэтому мы не можем дать операнду КЕСЕМ 
значение ЕВ. 

Теперь перечислим все возможные значения операндов, встре- 
тившихся в рассмотренных выше примерах, и объясним их смысл. 


ОМ =тип-устройства. Ключевое слово ОМПТ означает, 
что мы описываем тип используемого устройства. В некоторых 
системах ОМПТ=ТАРЕ означает, что используется стандартное 
лентопротяжное устройство. Это лентопротяжное устройство 
может работать с 9-дорожечной лентой; плотность записи 800 или 
1600 Брё. В вашем вычислительном центре стандартное назна- 
чение для 9-дорожечной магнитной ленты может быть другим. 
Например, ОМТ=2400 и ОМГТ =3400-4 относятся к определен- 
ным типам лентопротяжек фирмы 1ВМ. 


УОГ. =5ЕК =имя-тома. Ключевые слова УОГ=5ЕК опре- 
деляют имя (серийный номер) тома ленты, т. е. бобины, которую 
оператор должен установить на свободную лентопротяжку. Имя 
ленты имеет длину до 8 литер и обычно присваивается персона- 
лом вычислительного центра каждой бобине. Когда задание го- 
тово к выполнению, оператор получает от машины сообщение, 
что ленточный том с именем имя-тома должен быть установлен 
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на какое-либо лентопротяжное устройство. Пока лента не уста- 
новлена, задание не выполняется. 


21$Р=статус. Ключевое слово ОТЗР указывает статус (дис- 
позицию) подлежащего обработке файла. У этого операнда 
могут быть три значения: МЕМ/, ОГО и МОБ. МЕМ/ используют 
при создании нового файла. ОГО, когда мы читаем или переписы- 
ваем на другой том существующий файл. МОО.задают в том слу- 
чае, если желательно добавить записи к концу существующего 
файла. Заметим, что если файл не существует, то значение МОР 
эквивалентно МЕ\. 


ГАВЕГ =номер файла или ГАВЕГ=(номер файла, МГ.). 
Ключевое слово [АВЕГ используют для указания ленточного 
файла, подлежащего обработке. Первую форму применяют, если 
файл на ленте помечен; вторую — если файл не помечен (МГ). 


2$№=имя файла. Этот операнд необходимо указать, если 
ленточный файл помечен. Он задает имя файла длиной от | до 
8 литер. Если файл создается в данном задании (РГР =МЕМ,), 
то имя-файла будет записано в.метку файла. Если файл уже создан 
(2ТЗР=0ОГ.0), то имя-файла сравнивается с именем, которое 
ранее было записано в метке. Если имена не совпадают, то про- 
грамма выполняться не будет. Поэтому операнд ОМ обеспе- 
чивает некоторую защиту от постороннего вмешательства или 
непреднамеренной порчи ленточного файла. 


ОСВ=(КЕСЕМ=формат, ГВЕСЁ=длина-записи, 
ВЕКЕ =длина-блока). 


Этот операнд описывает, каким образом выводятся на ленту ло- 
гические записи. Если КЕСЕМ=Е, то все записи имеют фикси- 
рованную длину, равную длине-записи, и не сблокированы. 
В этом случае длина-блока должна быть такой же, как и длина 
логической записи. Если КЕСЕМ=РВ, то все записи имеют фик- 
сированный размер длина-записи и упакованы в блоки размера 
длина-блока, который должен быть кратным длине-записи. Если 
КЕСЕМ=У\У, то записи могут иметь переменную длину до (длина- 
записи —4) и каждая запись выводится в виде отдельного блока. 
Длина-блока должна быть на 4 литеры больше, чем длина-записи. 
Указанное 4-литерное поле используют для управляющей ин- 
формации. Если КЕСЕМ==\В, то длина записи может изменяться 
в пределах до (длича-записи—4). Такие логические записи упа- 
ковываются в блоки длиной, на 4 литеры меньшей, чем длина- 
блока. Значение длины-записи должно быть на 4 литеры больше, 
чем наибольшая возможная длина данных. Значение длины- 
блока должно быть на 4 литеры больше числа, кратного длине- 
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записи. Назначение КЕСЕМ=уУВ$ в основном эквивалентно 
УВ, но используется при бесформатном вводе/выводе. 


Дополнительно к ОО-командам в задании, включающем ра- 
боту с магнитной лентой, могут потребоваться другие управля- 
ющие перфокарты — по одной для каждой бобины магнитной 
‘ленты. Форма написания и расположение этих команд в колоде 
целиком зависят от соглашений, принятых в вычислительном 
центре. Прежде чем работать с магнитной лентой, необходимо 
узнать, какие дополнительные /СЁГ-карты для работы с лентой 
требуются в вашем вычислительном центре, какая информация 
на них должна быть задана и где такие карты располагаются 
в колоде. 


4.3.2. Назначения устройствам в системе РЕС-10 


Фортран РЕС-10 позволяет работать с непомеченными много- 
файловыми лентами. Каждый блок, выводимый на магнитную 
ленту, имеет фиксированную длину — обычно 128 слов (640 литер). 
Размеры этих блоков и их физические границы не связаны с раз- 
мерами логических записей и их границами. Поэтому физичес- 
‚кий блок может содержать больше одной логической записи, а 
одна логическая запись может состоять из нескольких физиче- 
ских блоков. 

Для указания границ логических записей применяются два 
метода. Один метод используется для форматных записей, дру- 
гой — для бесформатных. 

Форматную запись (выводимую форматной инструкцией 
МУК [ТЕ) записывают с литерой конца строки, которую добавляет 
к записи сама система. Эта специальная литера сообщает о 
конце записи во время любых последующих операций чтения 
(см. рис. 4.3). 

Бесформатную запись выводят с одним управляющим словом, 
предшествующим записи, и вторым, следующим за записью. Если 
запись содержит несколько блоков, то используется дополни- 
тельное управляющее слово для каждого блока, расположенного 
за первым. Управляющие слова содержат длину сегментов записи 
и применяются при считывании записей или при выполнении 
инструкции ВАСК$РАСЕ (см. рис. 4.5). 

При написании на Фортране инструкций ввода/вывода за- 
дают номера логических устройств каналов. К каждому такому 
каналу по умолчанию подключено некоторое устройство пред- 
определенного класса. К фортранному каналу с номером 2 под- 
ключено физическое устройство ввода с перфокарт, к каналу 
3 — АЦПУ, к каналу 5 — терминал, работающий в режиме разде- 
ления времени. 
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Обращений к каналам 2, 3 или 5 достаточно для ввода с пер- 
фокарт, вывода на печать или для работы с терминалом. Однако 
при обращении с помощью какого-либо номера канала к маг- 
нитной ленте необходимо выполнить определенные действия. 
Во-первых, попросить оператора установить данную ленту на 
какое-нибудь лентопротяжное устройство. Далее мы должны 
согласовать номер канала в программе на Фортране с этим фи- 
зическим лентопротяжным устройством. Для этого ‘используют 
команду МООМТ. Форма этой команды при обращении к ленте 
по номеру устройства канала нк имеет вид 


.МООМТ МТА:нк/ВЕЕЕО:имя-тома/доступ 


Команда МОПМТ требует, чтобы бобина имя-тома была установ- 
лена на какое-нибудь лентопротяжное устройство. Оператор 
находит запрашиваемую ленту и устанавливает ее на какое- 
нибудь свободное устройство. Поскольку идентификационные 
номера бобин назначаются обслуживающим персоналом вычис- 
лительного центра, каждому такому номеру соответствует одна 
вполне определенная бобина магнитной ленты. 

Значением доступ может быть КОМЕУ или \ЕМВЕ. Если 
задано КОМСУ (Кеаа ОМГУ), то магнитная лента может быть 
только прочитана. Запись на ленту запрещена. Если задано 
М\МЕМВГ (\гие ЕМаВГе), то можно выполнять команды как 
чтения, так и записи на ленту. Этот операнд помогает предотвра- 
тить случайную порчу файлов на ленте. 

Если необходимо установить несколько лент, то должна быть 
выполнена команда МОЧМТ для установки каждой ленты. 

При установке лента ставится на начало. Начальная пози- 
ция на ленте может не соответствовать желаемой. Если, напри- 
мер, мы хотим обработать третий файл, то должны пропустить 
первых два файла. Для пропуска файлов выполняется команда 
ЗК]Р. Ее формат 


.ЗР нк: и ЕШЕЗ 


Выполнение этой команды приводит к тому, что лента, подклю- 
ченная к каналу нк предыдущей командой МООМТ, должна быть 
перемотана к началу (п--1)-го файла. 

Команда 5КТР может также иметь следующий формат: 


„ЭР нк: ЕОТ 


Команда перематывает соответствующую магнитную ленту к 
концу последнего файла. Команду используют для добавления на 
ленту новых файлов. 

После того как выполнение программы закончилось, для 
каждой установленной магнитной ленты следует задать команду 
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О1$МООМТ. Форма этой команды: 
„РТЗМООМТ нк: 


Мы не дали здесь детального описания того, как именно вклю- 
чать команды МООМТ, КР и ОГЗМООМТ, относящиеся к 
фортрановской программе. Это включение будет различным в 
зависимости от того, работаете ли вы в режиме пакетной обработ- 
ки (представляете задание на перфокартах и получаете вывод на 
АЦПУ) или разделения времени (представляете на выполнение 
задание и получаете вывод на телетайп или дисплей). Подробная 
информация о том, как пользоваться описанными командами, 
приведена в руководствах РЕС по режимам пакетной обработки 
и разделения времени. Следует проконсультироваться, каким 
из этих руководств пользоваться. | 

В любом случае для правильного использования магнитных 
лент нужно, чтобы команды МОЧМТ задавались перед выполне- 
нием программы, а команды ОТЗМОЧМТ — после выполнения. 
Кроме того, во многих ВЦ требуется, чтобы перед любыми за- 
просами МООМТ оператору была выдана команда РГЕАЗЕ. Это 
делается для того, чтобы освободить лентопротяжное устройство. 
Прежде чем пытаться выполнить программу с обращением к 
магнитной ленте, следует узнать, какие специальные соглаше- 
ния приняты в вашем ВЦ. 


4.4. Устройства прямого доступа 


Хотя магнитные ленты очень удобны для многих применений, 
существуют такие классы задач, для которых они не очень под- 
ходят. Рассмотрим, например, систему заказа авиационных би- 
летов. Такая система должна иметь быстрый доступ к различным 
блокам данных в произвольном порядке. Поскольку магнитные 
ленты организованы так, что блок 2 может быть обработан только 
после блока |, блок 3 — после блока 2 ит. д., ленты не годятся 
для обработки записей в произвольном порядке. Действительно, 
требуется как минимум несколько минут для того, чтобы про- 
честь блок, расположенный в конце ленты, если лента установле- 
на на начало... 

Запоминающие устройства, предназначенные для обеспече. 
ния быстрого доступа в произвольном порядке, называют ист- 
ройствами прямого доступа. Наиболее широко используемые 
устройства этого типа — запоминающие устройства на магнит: 
ных дисках с подвижными и фиксированными головками. 

Запоминающее устройство на магнитном диске представляет 
собой средство, которое с помощью головок чтения/записи обес. 
печивает доступ и запись данных на пакетах магнитных дисков 
Пакет магнитных дисков состоит из набора круглых пластин, 
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расположенных одна над другой (рис. 4.8). Каждая из этих 
пластин содержит большое число (обычно более 200) концентри- 
ческих дорожек записи как на одной, так и на другой стороне 
пластины. Механизм чтения/записи содержит либо по одной го- 
ловке чтения/записи на дорожку (диск с фиксированными го- 
ловками), либо одну головку для каждой поверхности диска — 
одну головку чтения/записи, которая может быть выдвинута на 
любую выбранную дорожку (подвижные головки). 


Дорожка 


Гебенчатый ЕЕ Е-- 
механизм 
чтения /записи 


Рис. 4.8. Пакет дисков с подвижным механизмом чтения /записи. 


Пакет дисков, устанавливаемый на устройство чтения/записи, 
вращается с некоторой фиксированной скоростью (обычно не ме- 
нее 40 оборотов в секунду), так что каждый блок данных, запи- 
санный на дорожке диска, проходит под головкой чтения/записи 
один раз за оборот. Постоянная высокая скорость вращения плюс 
способность перемещать головки чтения/записи на любую до- 
рожку обеспечивают быстрый доступ к блокам данных; обычно к 
любому заданному блоку можно получить доступ не более чем 
за пятую часть секунды, а среднее время доступа значительно 
меньше. 

Прямой доступ к данным на пакете дисков выполняется легко 
потому, что каждый блок имеет свой собственный адрес. Этот 
адрес определяется расположением блока на дорожке, дорожки 
на поверхности пластины и пластины относительно других пла- 
СТиН. 

Помимо прямого доступа, диски могут обеспечивать после- 
довательный доступ. На самом деле в этом смысле они лучше 
лент, потому что можно обновлять любой блок на месте и записы- 
вать блоки любой длины, даже одиночную литеру. Все это дости- 
гается благодаря постоянному вращению дисков. Недостатки 
дисков По отношению к лентам обусловлены экономическими 
показателями. Дисковые устройства, обладающие более слож- 
ными техническими характеристиками, относительно дороже. 
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4.4.1. Характеристики некоторых дисковых устройств 


Дисковые устройства с подвижными головками имеют боль- 
шее применение, чем устройства с фиксированными головками. 
Это отчасти связано с тем, что они дешевле, а также вследствие 
того, что дисковые пакеты для устройств с фиксированными го- 
ловками несъемные. В противоположность этому пакеты дис- 
ков с подвижными головками можно устанавливать и снимать, 
по существу, так же, как и магнитные ленты. 

К обычно используемым дисковым устройствам с подвижными 
головками относятся устройства ВМ 3330 и РЕС КРОЗ. Два 
общепринятых дисковых устройства с фиксированными голов- 
ками — ВМ 2305 и РЕС В О1О. Ниже приведены характеристики 
указанных четырех дисковых устройств. 


Для машин ВМ ВМ РЕС РЕС 
Производитель ВМ ВМ Метогех Виггоцей$ 
Тип Подвижн.  Фиксир. Подвижн.  Фиксир. 
Номер модели 3330-1 2305-1 ВРОЗ ЮрО10 
Максимальное число 

дисков в пакете 8 1 8 4 
Емкость памяти 

(в млн. литер) 100 5.75 52 2.5 


Время доступа 
(в миллисек.) 


Среднее 37.5 2.5 62.5 16.5 
Максимальное 72 5 105 33 
Скорость передачи 
(1000 литер/сек) 806 3000 333 389 


Как видно из этой таблицы, следует отметить, что время 
доступа для дисковых устройств с фиксированными головками 
значительно меньше, чем для устройств с подвижными головка- 
ми. Это связано с тем, что устройства с фиксированными го- 
ловками имеют только задержки вращения (время, требуемое для 
подхода выбранного блока к головке чтения/записи). В противо- 
положность этому устройства с подвижными головками имеют 
как задержку вращения, так и задержку поиска (время, требуе- 
мое для подвода головки чтения/записи к нужной дорожке). 


4.4.2. Управление дисковой памятью в О$ 1ВМ 360-370 


Дисковый пакет на устройстве чтения/записи ВМ представ- 
ляет для пользователя том и начинается с ряда дорожек, на кото- 
рых записано оглавление тома (УТОС). Таблица-оглавление со- 
держит по одному элементу (одной записи) на каждый записан- 
ный на пакете файл и по одному элементу на группу смежных 
незанятых дорожек. Запись для каждого файла указывает его 
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имя, формат его блоков и дорожки, отведенные под файл. Запись 
для каждой свободной области указывает адрес первой свобод- 
ной дорожки и сообщает, сколько свободных дорожек входит 
в состав этой области. 

УТОС имеет несколько назначений. Во-первых, пользователь, 
желающий записать на пакет новый файл, использует сведения 
о свободных областях. Если пакет содержит достаточную сво- 
бодную область, то дорожки будут исключены из списка из сво- 
бодных областей и будут отведены под новый файл, о чем в оглав- 
лении будет сделана соответствующая запись. При уничтожении 
файла его дорожки вновь будут переданы в список свободного 
пространства. 

Записи о файлах в оглавлении тома УТОС необходимы также 
в тех случаях, когда хотят обработать имеющийся набор данных. 
Они указывают, существует или нет набор данных на пакете, и 
если запись о наборе данных найдена, то она указывает адреса 
и форматы блоков набора данных. 


4.4.3. Управление дисковой памятью в системе ОЕС-10 


Блоки на дисковом пакете системы РЕС-19 формируются во 
многом подобно блокам на магнитных лентах РЕС-10. Данные 
записываются в блоках фиксированной длины, обычно по 
128 слов. Фиксированный размер блока дает возможность рас-. 
пределять память для файлов в размерах, кратных размеру бло- 
ка. Такое распределение не зависит от размеров дорожек диска. 

Чтобы хранить сведения об используемой части пакета диска 
и свободной области, каждый пакет содержит таблицу распреде- 
ления памяти, основное оглавление и набор оглавлений пользо- 
вателей. Таблица распределения памяти содержит элементы, 
указывающие состояние каждого блока пакета (занят, свободен). 
Эта таблица нужна всякий раз, когда требуется область памяти 
для создания нового файла, или при освобождении области памя- 
ти вследствие уничтожения файла. 

Основное оглавление включает по одному элементу на оглав- 
ление пользователей. Это сделано для того, чтобы находить нуж- 
ное оглавление при поиске файлов, принадлежащих тому или 
иному пользователю. Оглавления пользователей содержат имя 
каждого файла пользователя и блоки, которые отведены этому 


файлу. 


4.4.4. Последовательная обработка дисковых файлов 


Данные могут быть записаны на диск или считаны с диско- 
вого файла тем же самым последовательным способом, как и с 
магнитной ленты. Действительно, форматы записей, используе- 
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мые для дисков, точно такие же, как и для ленты, а специальные 
команды ВАСК$РАСЕ, ЕМХОЕШЕ и ВЕ\ЗМИМО имеют логически 
то же самое действие, что и в магнитных лентах. 

Указанная совместимость между последовательными файлами 
магнитных лент и дисков позволяет писать программы, которые 
работают с данными, записанными на любом магнитном носителе. 
В программах на Фортране не нужно делать никаких изменений. 
Однако для каждой системы при переходе от одного носителя 
к другому отдельные команды (например, команда МООМТ и 
ОО-команды) должны быть определены по-своему. 


4.4.5. Обработка дисковых файлов с произвольным 
доступом 


Основное достоинство дисков по сравнению с лентами — их 
способность обеспечивать произвольный порядок обработки 
блоков с данными. Чтобы использовать эту возможность, в 
Фортране имеется режим ввода/вывода, называемый режимом 
произвольного доступа. С этим режимом связаны два новых типа 
инструкций. Кроме того, для работы в режиме произвольного 
доступа внесены незначительные изменения в инструкции КЕАО 
и \ЕВ[ГТЕ, применяемые для последовательной обработки. 

Для осуществления ввода/вывода в режиме произвольного 
доступа вначале необходимо выполнить инструкпию, которая 
описывает подлежащий обработке файл. Эта инструкция, назы- 
ваемая РЕЕПМЕ ЕП.Е, имеет следующую форму в Фортране 
ВМ: 


РЕВ МЕ ЕЕ нк (зап, разм, [, а-перем) 


и форму 
САП, РЕЕ!1МЕ ЕШ.Е (нк, разм, а-перем, 'имя-файла.ОАТ’) 


в Фортране РЕС-10. Параметры инструкций РЕЕГМЕ ЕШЕ 
имеют следующее значение: 


нк — фортрановский номер канала,’ назначенный для дан- 
ного файла. 

зап — Количество логических записей, которое должно быть 

ассоциировано с этим файлом. Каждая такая логиче- 

ская запись имеет свой номер, который находится в 

диапазоне от | до зап (не определен в ОЕС-10). 

разм — Длина каждой записи внутри файла. В Фортране ВМ 

это количество литер. В Фортране РЕС-10 это число 

слов для бесформатного В/В и число литер для фор- 
матного В/В. 

а-перем — целая переменная, называемая ассоциированной пере- 

менной. Этой переменной присваивается значение | 
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перед выдачей на устройство с нк любой команды вво- 
да/вывода. После выполнения ввода/вывода значение 
а-перем всегда на | больше номера последней записи, 
которая была обработана. 


Третий оставшийся параметр кодируется существенно различ- 
но для двух рассматриваемых нами вычислительных систем. 
В Фортране ВМ этот параметр обозначен буквой ЕЁ. (Существуют 
и другие значения этого параметра, но мы их не обсуждаем.) 
В Фортране РЕС-10 на месте этого параметра нужно задать имя 
(в апострофах) подлежащего обработке файла произвольного 
доступа. Имя записывают в виде цепочки из 6 литер, за которой 
следует цепочка .ОАТ. 

При выполнении инструкции РЕЕИМЕ ЕШЕ на диске выде- 
ляется область памяти, которая подразделяется на записи зап, 
каждая длиной разм. Поскольку все записи фиксированной дли- 
ны, система может легко вычислить, где расположена любая 
запись. 

Инструкции КЕАР и \ВГТЕ для файлов с произвольным до- 
ступом имеют следующую форму: 


1. ВКЕАШО (нк’п, формат) список 
2. КЕАШ (нк’п) список 

3. \МВИЕ (нк’п, формат) список 
4. \УЕКГТЕ (нк’п) список 


Инструкции [| и 3 применяют для форматных записей, инструк- 
ции 2 и 4 — для бесформатных. Дополнительное поле п является 
целым выражением, значение которого представляет номер под- 
лежащей обработке записи. После выполнения одной из приве- 
денных инструкций значение ассоциированной переменной (а-пе- 
рем) устанавливается в и--[. Поэтому инструкция 


\ЕТТЕ (2’15) ($ (1), 1=1, 20) 


выводит запись из 20 слов, состоящую из двоичных представле- 
ний 5(1), 5(2),..., $5(20), на дисковую область, ассоциирован- 
ную с логической записью 15 на устройстве 2. После того как 
вывод завершен, ассоциированная переменная файла принимает 
значение 16. 

Автоматическое приращение ассоциированной переменной 
файла с произвольным доступом может быть удобным, когда 
подлежащий обработке файл последовательного типа. Чтобы 
убедиться в этом, рассмотрим задачу чтения колоды перфокарт 
и записи ее в файл с произвольным доступом, ассоциированный 
с устройством 1. Полагая, что О5КРО$ это ассоциированная 
переменная, достаточно написать следующие инструкции: 
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- 0$КРО$ = 1 
10 ВЕАО (КОВ,1000,ЕМО=99) (САВОС(ТУ, 1=1,80} 
1000 РОВМАТ (80А1) 
ИВТТЕ (1'0$КРО$,1000) (САВОС(Г), 1=1,80% 
60 Т9 10 


До выполнения указанного цикла необходимо выполнить ин- 
струкцию РЕРИМЕ ЕШЕ. В Фортране ВМ эта инструкция мо- 
жет быть задана как 


_РЕРШМЕ ЕРШ 01 (200, 80, 1., О$КРО5) 
В Фортране РЕС-10 можно было бы записать 
САМ. РЕНМЕ ЕШЕ (1, 80, 2$КРО$, 'ЕОВ01.РАТ’) 


В примере для ВМ мы полагаем, что на диск должно быть запи- 
сано не более 200 записей. В примере с РЕС-10 таких ограниче- 
ний нет. 

При выполнении сегмента программы, состоящего из цикла — 
прочитать запись, обработать ее, вновь вернуться на чтение — 
было бы удобно иметь систему, которая подготавливалась к сле- 
дующему чтению во время обработки текущей записи. Это может 
повысить эффективность программы, позволяя совмещать чтение 
с процессом обработки. В Фортране можно добиться такого сов- 
мещения выдачей инструкции ЕПМР после каждой инструкции 
чтения. Инструкция ЕПМО имеет следующий вид: 


ЕПМО (нк’п) 


Ее выполнение приводит к тому, что система находит запись п. 
Эта запись не доступна для программы, пока не будет выдана 
последующая инструкция чтения, в которой опять указана за- 
пись п. Таким образом, эффективность программы можно повы- 
сить, написав вышеупомянутый цикл в виде последовательно- 
сти: чтение текущей записи, нахождение следующей подлежащей 
обработке записи, обработка текущей записи, возвращение на 
чтение. 


4.5. Назначение файлам устройств прямого 
доступа — примеры | 


4.5.1. Назначение устройствам прямого доступа в системе 
О5//СЁЕ ВМ 


Так же как устройства ввода с перфокарт, АЦПУ и магнит- 

ные ленты, устройства прямого доступа ассоциируют с номерами 
‘’ каналов посредством ОШО-команд. В Ор-командах используют 
ключевые слова ОМТ, РГР, РЗМ и РСВ, которые были уже 
нами рассмотрены, плюс одно новое ключевое слово ЗРАСЕ. 
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Параметр ГАВЕГ, применяемый для магнитных лент, в устрой- 

ствах прямого доступа не имеет смысла, а параметр УОГ=5ЕЮ 

хотя и имеет смысл, но мы его здесь не рассматриваем. 
Параметр ОМГТ следует задавать так: 


ОМТ=5УЗРА 


Он указывает на работу с устройством прямого доступа ($УЗ{ет 
ПУтес{ Ассез$ аем1се). 

Параметры ОЗМ и ОСВ задают так же, как и для ленты, с той 
разницей, что поле КЕСЕМ в ОСВ для файлов с произвольным 
доступом должно быть записано как КЕСЕМ=Е. 

Параметр РГР более сложный, чем для магнитных лент. 
Его записывают так: 


215$Р= (статус, диспозиция) 


Здесь статус — МЕ\М, ОГО или МОР, а в поле диспозиция 
может быть задано РЕГЕТЕ, САТЁЕ@ или КЕЕР. Указанные 
диспозиции означают следующее: 


РЕГЕТЕ — уничтожить файл на диске после выполнения теку- 
щего задания. Все области, относящиеся к файлу, 
передаются операционной системе для перераспре- 
деления. 

САТЕ@ — сохранить файл, записав его имя и адрес в систем- 
ный каталог. Последующие задания могут иметь 
доступ к этому набору данных просто по его имени. 

КЕЕР — сохранить файл. Если файл уже был помещен в ка- 
талог в предыдущем задании, то он остается ката- 
логизированным. 


Параметр ЗРАСЕ должен быть задан в том случае, если файл 
создается, т.е. если статус в ОГЗР определен как МЕХ. Этот 
параметр сообщает о потребности файла в памяти. Он кодируется 
как 


ЗРАСЕ = (блок, (нач,втор) В ТЕ) 


Значение блок определяет размеры физических блоков (так же, 
как В. КЗ Е в параметре ОСВ); нач указывает, какое колисе- 
ство этих блоков необходимо первоначально; втор задает размер 
вторичной области, которая будет использована в том случае, 
если израсходована первоначально запрашиваемая область. Та- 
кая вторичная область может быть затребована до 15 раз. По- 
этому максимальный размер файла равен нач-- 15*втор блоков, 
каждый размером блок. Код КГЗЕ говорит только, что любая 
неиспользованная при выполнении данного задания область бу- 
дет возвращена системе. 
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Следующие примеры иллюстрируют кодирование РО-команд 
для различных задач: | 


Пример 1. Пусть для создания на диске последовательного 
файла с именем ЕОКТ мы предполагаем использовать устройство 
18. Логические записи файла имеют длину 40 литер и сблокиро- 
ваны по 80 записей в блоке. Файл каталогизируется для даль- 
нейшего применения. 


//ЕТ18Е001 00 ИМТТ=$У$О0А,ОТ$Р= ( МЕН, САТЕС) ›О$М=РОВТ» 
// ОСВ= ( ВЕСЕМ=РВ В ЕСЬ=40,8В4К$12Е=3200) » 
11 ЗРАСЕ= ( 3200,(50,10),ВЕЗЕ) 


Параметр ЗРАСЕ отводит область памяти на диске под 50 бло- 
ков. Если все блоки использованы, размер области возрастает 
до 60, затем до 70 и т. д. максимально до 200 блоков. 


Пример 2. Пусть для обработки файла, созданного в примере 
|, мы предполагаем использовать устройство 8. Файл должен быть 
сохранен после завершения данного задания. 


/ЕТО8Е001 ОО О1$Р= (ОГО, КЕЕР),2$М=ЕОВТ 


Пример 3. Для обработки файла, созданного в примере 1, 
мы предполагаем использовать устройство 12. После завершения 
данного задания, файл должен быть уничтожен. 


//ЕТ12Е001 РБ БТ$Р= (ОЕО,РЕГЕТЕ),О$М=ЕОКВТ 


4.5.2. Назначение устройствам прямого доступа 
в системе ОЕС-10 


Любой пользователь может получить область памяти на дис- 

‚ ках в режиме прямого доступа (до некоторого максимального 

размера области, задаваемого администратором). В отличие от 
системы ВМ 360-370 нет необходимости предварительно запра- 
шивать область для каждого файла. На самом деле при выпол- 
нении инструкции САГТ, РЕЕРМЕ ЕШ.Е происходит только на- 
значение устройства и наименование файла. 

Имя последовательного дискового файла, связанного с кана- 
лом нк, всегда представлено в виде ЕОКнк.ОАТ. Назначение 
дискового устройства происходит автоматически для номеров ка- 
налов 1, 20, 21, 22, 23 и 24. Назначение диска другим номерам 
каналов происходит посредством команды АЗЗ1ОМ следующим 
образом: 


.АЗЗ@М ОЗК: нк 


После завершения выполнения программы все созданные 
при данном выполнении файлы остаются на диске. Файлы, кото- 
рые больше не нужны, могут быть уничтожены командой 


.РЕГЕТЕ имя-файла.РАТ 
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(Замечание. Тем, кто интересуется подробностями организации 
ввода/вывода в системе РЕС-10, следует ознакомиться с инструк- 
цией ОРЕМ Фортрана РЕС-10. Она дает больше возможностей, 
чем команда АЗЗГАМ.) 


4.6. Пример. Система поиска книг 
по ключевым словам 


Рассмотрим задачу поиска в библиотеке всех книг, посвящен- 
ных некоторой научно-технической области. Один из наиболее 
часто используемых методов — сканирование каталогов библио- 
теки по всем заглавиям, содержащим некоторые ключевые слова. 
Например, при поиске книг, касающихся языков программиро- 
вания, мы будем, вероятно, проверять заглавия книг, в которых 
содержатся слова Алгол, Кобол, Фортран, ПЛ/[ и др. Ясно, что 
такие операции лучше выполняют вычислительные машины, чем 
люди, поэтому мы построим программу поиска по ключевым 
словам. | 

Предполагаемая программа имеет два входных файла. Пер- 
вый, Ленточный или дисковой последовательный файл содержит 
заглавия всех книг, принадлежащих библиотеке. Логические 
записи внутри этого файла представляют собой записи, каждая 
из которых имеет длину 70 литер и содержит заглавие одной 
КНИГИ. 

Второй входной файл вводится с перфокарт. Колода перфо- 
карт состоит из двух частей. Она начинается одной или серией из 
нескольких перфокарт, каждая из которых содержит ключевое 
слово в колонках с | по 8. Окончание ключевых слов сигнализи- 
руется перфокартой, содержащей звездочку (+), пробитую в ко- 
лонке |. Следом за перфокартой со звездочкой располагают 
набор перфокарт команд поиска. Каждая из этих перфокарт 
содержит одноразрядный код в колонке |. Некоторые из этих 
перфокарт содержат ключевые слова, пробиваемые в колонках 
с 3 по 10. Разрешенные коды команд и их значения следующие: 


1. Установить систему поиска в исходное состояние, когда 
ни одна книга еще не выбрана для вывода на печать. 


2. Требует ключевого слова. По этой команде все заглавия, 
содержащие данное ключевое слово, будут добавлены к 
списку уже отобранных заглавий. Так, при выполнении 
последовательности команд 


| 
2 ПРОГРАММА 
2 ПРОГРАММЫ 
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будут выбраны все заглавия, которые содержат слово 
ПРОГРАММА или ПРОГРАММЫ. 


. Требует ключевого слова. Эта команда позволяет вклю- 


чить в список заглавий только те ранее отобранные за- 
главия, которые содержат данное новое ключевое слово. 
Поэтому при выполнении последовательности команд 


] 
2 ПРОГРАММА 
3 СТИЛЬ 


будут выбраны все заглавия, которые содержат оба слова 
ПРОГРАММА и СТИЛЬ. 


. Отрицание списка ранее выбранных заглавий так, что те- 


перь будут выбраны только те заглавия, которые ранее не 
были выбраны. Поэтому команды 


] 
2 ПРОГРАММА 
4 


отберут все заглавия, которые не содержат слово ПРО- 
ГРАММА. 


т 


. Напечатать отобранные заглавия. Эта команда печатает 


заглавия всех книг, которые были выбраны в текущем за- 
дании. Поэтому при выполнении команд | 


] 

2 РАЗДЕЛЕНИЕ 
2 ОТРЕЗКИ 

3 ВРЕМЕНИ 

4 

5 


будут напечатаны заглавия, которые не содержат пары 
слов (РАЗДЕЛЕНИЕ ВРЕМЕНИ) или (ОТРЕЗКИ ВРЕ- 
МЕНИ). 


Две основные структуры данных, используемые для выполне- 


ния приведенных пяти команд поиска, представляют собой дву- 
мерный логический массив ТТЕКЕУТХ и логический список $Е- 
ГЕСТ. Во время выполнения фазы программы, в которой перво- 
начально вводятся заглавия, в каждом заглавии просматривают- 
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ся содержащиеся в нем ключевые слова. Если К-е ключевое сло- 
во содержится в [-м заглавии, то элементу ТТЕКЕУ (Т,К) будет 
присвоено значение .ТКОЕ.; в противном случае .ЕАГ$Е. . 

После того как началась программная фаза, в которой обра- 
батываются команды поиска, список ЗЕГЕСТ определяет, какие 
заглавия в текущем задании выбираются для печати. Значение 
ЗЕГЕСТ (|) устанавливается в .ТКОЕ. в том случае, если выбра- 
но [-е заглавие. Таким образом, задача подпрограммы поиска 
состоит единственно в том, чтобы обновить каждый элемент $Е- 
ГЕСТ на основании определенной команды и значений, найден- 
ных в ТТЕКЕУ. Поэтому, например, команда 


3 ФОРТРАН 


где ФОРТРАН является К-м ключевым словом, реализуется 
посредством инструкции 


ЗЕГЕСТ (])]=5ЕТЕСТ(Т) .АМО. ТТЕКЕУ (1, К) 


для [ в диапазоне от | до количества хранящихся заглавий. 
Команда печати (5) выводит на печать [-е заглавие только в слу- 
чае, если ЗЕГЕСТ (Г) имеет значение .ТКОЕ. . 

Программа, реализующая данную информационно-поисковую 
систему, приведена на рис. 4.9. 


С * * з СЗ ЗЕ В: В ЗЕ: Е Е В * 
Сх “СИСТЕМА я ПОИСКА КНИГ по “КЛЮЧЕВЫМ СЛОВАМ. 

С*« ДАННАЯ ПРОГРАММА ВВОДИТ НАБОР ЗАГЛАВИЙ КНИГ И КЛЮЧЕВЫХ + 
С»ж СЛОВ, ИСПОЛЬЗУЕМЫХ ДЛЯ ИНДЕКСАЦИИ КНИГ. ЗАТЕМ ВВОДИТСЯх*х 
С* ИНФОРМАЦИЯ. УСТАНАВЛИВАЮЩАЯ ПО КЛЮЧЕВЫМ СЛОВАМ, К КАКИМ * 
С« КНИГАМ ПОЛЬЗОВАТЕЛЬ ХОЧЕТ ИМЕТЬ ДОСТУП. СПИСКИ СООТВЕТ-* 
Сз СТВУЮЩИХ ЗАГЛАВИЙ КНИГ ВЫВОДЯТСЯ ПОТРЕБОВАНИЮ НА ПЕЧАТЬ. + 


Рис. 4.9. Система поиска книг по ключевым словам. (В главной программе: 
50: «Автоматизированная система поиска книг по ключевым словам»; 60: 
«Слова, которыми можно пользоваться при поиске».; 70: «Отладка. Матрица, 
созданная при выполнении данного задания»; 303: «Ошибка: недозволенный 
код команды»; 331: «Ошибка: недозволенное ключевое слово»; 361: «Заглавия, 
найденные по последнему набору команд»; 401: «Все запросы обработаны»; 
7001: «Ошибка: нет ключевых слов»; 7501: «Ошибка: нет заглавий»; 8001: 
«Ошибка: неожиданный конец данных». В подпрограмме СЕТКЕ\: 50: 
«Трассировка — вход в СЕТКЕУ»; 70: «Трассировка — номер ключевого 
слова»; 130: «Трассировка — выход из ОЕТКЕУ»; 8001: «Трассировка — вы- 
ход из ОЕТКЕУ — конец данных». В подпрограмме СЕТТТГ: 50: «Трассиров- 
ка — вход в СЕТТТГ;; 70: «Отладка — номер заглавия»; 210; «Трассировка — 
выход из СЕТТТ[». В подпрограмме ХТКАСТ: 50: «Трассировка — вход В 
ХТКАСТ»; 301: «Трассировка — выход из ХТКАСТ». В подпрограмме 
МЕХТУ: 50: «Трассировка — вход в МЕХТ\/ Г»; 121: «Грассировка — вы- 
ход из МЕХТ\УО, новых слов не найдено»; 350: «Грассировка — выход из 
МЕХТ\УР». В подпрограмме КЕУГОК: 50 и 201 — трассировка входа и 
выхода). 
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С» ФОРМАТ ВВОДА (ФАЙЛ ОБРАЗОВ ПЕРФОКАРТ): 
С*« НАБОР ПЕРФОКАРТ, КАЖДАЯ ИЗ КОТОРЫХ СОДЕРЖИТ КЛЮЧЕВОЕ" 
С* СЛОВО В КОЛОНКАХ 1-8. 


* 
С»« КАРТА МАРКЕР КОНЦА ДАННЫХ, СОДЕРЖАЩАЯ . В КОЛОНКЕ 1. * 
С» НАБОР ЗАПРОСОВ НА ПОИСК, КАЖДЫЙ В ФОРМЕ: н 
С* КОЛОНКА 1 — КОД КОМАНДЫ (1, 2, 3, 4 ИЛИ 5); 
С* КОЛОНКИ 3—10 КЛЮЧЕВЫЕ СЛОВА (ИСПОЛЬЗУЮТСЯ ТОЛЬКО* 
С* В ТОМ СЛУЧАЕ, ЕСЛИ КОД КОМАНДЫ 2 ИЛИ 3)* 
с ФОРМАТ ВВОДА (ЛЕНТОЧНЫЙ ИЛИ ДИСКОВЫЙ ПОСЛЕДОВАТЕЛЬНЫЙ*+ 
# ФАЙЛ): * 


С»« НАБОР ЗАГЛАВИЙ КНИГ (ЗДЕСЬ ДЛИНА ЗАГЛАВИЯ — 70 ЛИТЕР) 


С»+ ИНТЕРПРЕТИРУЕМЫЕ КОМАНДЫ ПОИСКА: 

С+« 1 — ВОССТАНОВИТЬ ИСХОДНЫЕ ЗНАЧЕНИЯ В СПИСКЕ $ЕТЕСТ. 

С» 2— ДОБАВИТЬ К СПИСКУ $ЕЕБЕСТ ВСЕ ЗАГЛАВИЯ С ДАННЫМ КЛЮЧЕ- * 
Са ВЫМ СЛОВОМ. 

С+« 3— ВЫЧЕРКНУТЬ ИЗ СПИСКА ЗЕГЕСТ ЗАГЛАВИЯ, НЕ СОДЕРЖАЩИЕ* 
С* ДАННОЕ КЛЮЧЕВОЕ СЛОВО. 

С+ 4— ОТРИЦАНИЕ РАНЕЕ ВЫБРАННОГО СПИСКА, ЧТОБЫ ВЫБРАТЬ ВСЕ» 


Ф 
% 
#+#%+ 


С» ЗАГЛАВИЯ, ОТСУТСТВОВАВШИЕ В ПРЕДЫДУЩЕМ СПИСКЕ. * 
С+ 5 —НАПЕЧАТАТЬ ЗАГЛАВИЯ ВСЕХ ВЫБРАННЫХ КНИГ. * 
С» * 
С» РЕАЛИЗУЕМЫЙ АЛГОРИТМ: 

С« А) КЛЮЧЕВЫЕ СЛОВА ВВОДЯТСЯ И ЗАПОМИНАЮТСЯ В СПИСКЕ * 
С» КЕУГАВ. 


ЕЗ 
С» В) ЗАГЛАВИЯ ВВОДЯГСЯ И ЗАПОМИНАЮТСЯ В ФАИЛЕ С ПРОИЗВОЛЬ- -* 
Са НЫМ ДОСТУПОМ. 
С*+ С) ПРИ СЧИТЫВАНИИ В КАЖДОМ ЗАГЛАВИИ ПРОСМАТРИВАЮТСЯ СО- -в 


Са ДЕРЖАЩИЕСЯ В НЕМ КЛЮЧЕВЫЕ СЛОВА. ЕСЛИ ЭТО 1-Е ЗАГЛА-* 
С* ВИЕ И ОНО СОДЕРЖИТ К-Е КЛЮЧЕВОЕ СЛОВО, ТО ЭЛЕМЕНТУ» 
С» ТТЕКЕУ (1, К) ПРИСВАИВАЕТСЯ ЗНАЧЕНИЕ. ТВОЕ. . 
С» 0) УСТАНАВЛИВАЕТСЯ В ИСХОДНОЕ СОСТОЯНИЕ СПИСОК ЗЕГЕСТ* 
С* ДЛЯ УКАЗАНИЯ ТОГО, ЧТО НИ ОДНО ЗАГЛАВИЕ ЕЩЕ НЕ ВЫБРА-* 
С» НО: (ЗЕСЕСТ(!)=.РАГ$Е., ДЛЯ ВСЕХ 1). 
С» Е) ВВОДЯТСЯ КОМАНДЫ ПОИСКА. ВЫПОЛНЯЮТСЯ ДЕЙСТВИЯ: 
С» 1 —-ЗЕСЕСТ(!)=.ЕАГ$Е., ДЛЯ ВСЕХ Г; 
С» 2 — ЗЕГЕСТ(1)=$ЕСЕСТ(1). ОЮ. ТТЕКЕУ (Г, К) 
С» ДЛЯ ВСЕХ Т, ГДЕ К ЭТО ИНДЕКС КЛЮЧЕВОГО СЛОВА, УКА- 
2% ЗАННОГО В ДАННОЙ КОМАНДЕ; 
С 3 — ЗЕГЕСТ(1)=5ЕТЕСТ(1).АМО. ТТЕКЕУ (1,К) 
С* ДЛЯ ВСЕХ 1, К (КАК ДЛЯ КОМАНДЫ 2); 
Са 4 — ЗЕГЕСТ(!) = МОТ.ЗЕТЕСТ(1) ДЛЯ ВСЕХ 1; 
С* 5 — ЕСЛИ 5ЕГЕСТ(1)=.ТКОЕ., НАПЕЧАТАТЬ 
С* 1-Е ЗАГЛАВИЕ. 

* 


С» ОСНОВНЫЕ ПЕРЕМЕННЫЕ: 

С»« КЕУТАВ — ГАБЛИЦА КЛЮЧЕВЫХ СЛОВ; СНАВАСТЕЮ=8; 

С* РАЗМЕР 50: 

С*ж КЕУМАХ — МАКСИМАЛЬНЫЙ РАЗМЕР КЕУТАВ; ЗДЕСЬ 

С* РАЗМЕР 50: 

Сж КЕУМОМ — ДЕЙСТВИТЕЛЬНОЕ КОЛИЧЕСТВО КЛЮЧЕВЫХ СЛОВ; 
С*« ТТЕКЕУ — МАТРИЦА ПОИСКА, 1.ОСТСАГ., РАЗМЕР 100+50; 

С«ж ТТЬМАХ — МАКСИМАЛЬНОЕ КОЛИЧЕСТВО ЗАГЛАВИЙ; ЗДЕСЬ 100; 
С*ж ТТЕМОМ — ДЕЙСТВИТЕЛЬНОЕ КОЛИЧЕСТВО ЗАГЛАВИЙ; 

С» ТТЬЕМТН — ДЛИНА В ЛИТЕРАХ КАЖДОГО ЗАГЛАВИЯ; 


Е Е Е 


С* ЗДЕСЬ 70; 

С*« ЗЕГЕСТ — ТЕКУЩИЕ ВЫБРАННЫЕ ЗАГЛАВИЯ, ГОС[СА!,, 

С= РАЗМЕР 50; 

С*« ТВЮЛСЕ — ЕСЛИ ТВОЕ. ТРАССИРОВКА ВСЕХ ОБРАЩЕНИЙ К ПОД-* 
С* ПРОГРАММАМ И ВЫ ХОДОВ, [О001САТ;; 

С+« ОЕВИСЗ — ЕСЛИ ТВОЕ, ПЕЧАТЬ ВСЕХ ВХОДНЫХ ДАННЫХ И ДАМП» 
С ТТЕКЕУ, (ГОСТСАТ,). 

2% * 


С; ИСПОЛЬЗУЕМЫЕ ПОДПРОГРАММЫ: * 

С»« ХТЮАСТ — ПРИСВОИТЬ ЗНАЧЕНИЯ ТТЕКЕУ В СООТВЕТСТВИИ С* 

Ск НАЙДЕННЫМИ СЛОВАМИ В ТЕКУЩЕМ ЗАГЛАВИИ; 

С* КЕУБГОК — ПРОВЕРИТЬ, ЯВЛЯЕТСЯ ЛИ ЗАДАННОЕ СЛОВО КЛЮ- * 
* ЧЕВЫМ; № 
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4.6. Пример 219 
С+ СЕТКЕУ — ВВЕСТИ И ЗАПОМНИТЬ НАБОР КЛЮЧЕВЫХ СЛОВ; * 
С+ СЕТТТЬ -— ВВЕСТИ И ЗАПОМНИТЬ ЗАГЛАВИЯ; * 
С+ МЕХТ\УО — ВОЗВРАТИТЬ СЛЕДУЮЩЕЕ СЛОВО В ЗАГЛАВИИ + 
Са ПОСЛЕ КОЛОНКИ 'СО!.. + 
С* + 
С»+« ПРОГРАММИСТ; ——— ДАТА: ———. * 
С к хх хз хх ххх жжа 


пап 


ТМТЕСЕВ ОЗКРТВ, КЕУМОХ, СОМАМО, Т» $ 
ЪОСТСАЕ ЗЕКТЕСТ( 50} 
СНАВАСТЕК КЕУМО*8 
ЗАМЕЧАНИЕ: ОБЩИЕ ПЕРЕМЕННЫЕ ИНИЦИАЛИЗИРУЮТСЯ В ВСОСК БАТА 
СОММОМИКЕУ/ ТВАСЕ; ОЕВУб, КОВ, РАТ» ТВС. ОВС, МАЗТЕА, ОТАЕСТ, 


ж ТТЬМТН, ТТЕМОМ, ТТЕМАХ, КЕУМИМ» КЕУМАХ, ТТЕКЕУ, ТТТАЕ, КЕУТАВ_ 


ТМТЕСЕА КОВ, РЕТ,» ТАС, 08, МАЗТЕЙЮ, ОТВЕСТ, ТТЬМТН. 
‚‹ ТМТЕбЕВ ТТЕМУМ, ТТЕМАХ, КЕУМИМ» КЕУМАХ 

\ОСТСАС ТВАСЕ», ОЕВУС, ТТЬКЕУ( 100,50} 

СНАВАСТЕК Т1ТЕЕ*ТО, КЕУТАВ+8 (50} 


ВЫДЕЛИТЬ ОБЛАСТЬ И НАЗНАЧИТЬ УСТРОЙСТВО ТОТВЕСТ" ФАЙЛУ 
С ПРОИЗВ. ДОСТУПОМ. ПОКАЗАНЫ ФОРМЫ ДЛЯ ТВМ 360-370 И 0ЕС-1@ 
ОЕЕТМЕ ЕТПЕ 12 4100, 70, &, ОЗКРТАУ 


С-----САЦЬ ОЕРТМЕ ЕЕ (12, 70, ОЗКРТА, "ТИТЬЕ$.ОАТ!} 


м 
© 


пооо осо ва 


1 9+1» 120, #°_ 


ПЕРЕД НАЧАЛОМ ОБРАБОТКИ ВЫВЕСТИ ЗАГОЛОВОК РАСПЕЧАТКИ 
МАТТЕ (РАТ, 50) | 
ЕОАМАТ 1", Т20, ‘АЦТОМАТЕО КЕУМОВО ВООК КЕТАТЕМАЕ ЗУ$ТЕМ' / 


ы ооеиию спьзиеварьньни птезоыичьеь® 1113 


ВВЕСТИ И ЗАПОМНИТЬ КАЖДОЕ КЛЮЧЕВОЕ, СЛОВО 
САБ СЕТКЕХ 158000} 


ЕСЛИ КЛЮЧ НЕ НАЙДЕН. ПРЕКРАТИТЬ РАБОТУ 
ТЕ (КЕУМУМ «Е 03 60 Т0 1 


НАПЕЧАТАТЬ СПИСОК ПРАВИЛЬНЫХ ключевых слов 
МЕТТЕ (РАТ, 60} (КЕУТАВ(Т), Г = 1, КЕУМО 


ЕОКМАТ у *КЕУМОВО$ мтсн МАХ ВЕ ЕО, РОВ, ВЕТАТЕМАК АЛЕ 
уз 


{(1Х, 8410} ) 


ВВЕСТИ ЗАГЛАВИЯ. ЗАПИСАТЬ НА ДИСК, СОЗДАТЬ МАТРИЦУ ПОИСКА 
САБЫ. бЕТТТЬ 


ЕСЛИ ЗАГЛАВИЙ НЕТ, ПРЕКРАТИТЬ РАБОТУ 
ТЕ {ТТЕМИМ «ЕС» 01 60 ТО 1500 


В ЛЮБОМ СЛУЧАЕ НАЧИНАТЬ ПОИСК, КАК ЕСЛИ БЫ БЫЛА 

НАЙДЕНА КОМАНДА СБРОСА (КОД=1). 

ОНА ИНИЦИАЛИЗИРУЕТ ЗЕЁЕСТ , 
ТЕ <«МОТ. 0Е80б} 60 ТОС 320 
МАТТЕ (08С»703 
РОВМАТ (8 +%% ОЕВИС %+% КЕТАТЕУАЕ МАТАТХ САЕАТЕО РОВ ТН1$ к 
00 100 Г = 1, ТТЕММ 

ИВТЕ {086,80} Ту УТТЕКЕУ(Т, у 3 > 1, КЕУНИМЬ 
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50 КОВМАТ ' ТИИЕ", 13. з‘, 7110 50619 
300 СОТ 
са ТО 20 
ВЯ: * жи хзх 
с ФАЗА ПОИСКА? ВСЕ КОМАНДЫ ПОИСКА ОБРАБАТЫВАЮТСЯ ЗДЕСЬ * 


С ххх фе 


с 
300 — ИЕАО (907,301.ЕНМ0=400} СОМАМО, КЕУМО 
301 — РОВМАТ (11+. 1Х, АЗ) 
ТЕ (0Е8Иб) МАТТЕ (086,302) СОМАМО, КЕУНО 
302 ЕОВМАТ (' 24% ОЕВУС %%% ВЕТАТЕМАЕ. С00Е'У; 12, ® КЕУНОВО ®,. 46$ 


с УБЕДИМСЯ. ЧТО КОМАНДА ВЕРНАЯ 
ТЕ ((СОМАМО „СЕ. 1) +АМО. (СОМАМО „!Е. 51$ 50 То 310 
МА1ТЕ (РАТ,303) СОМАМО 

303 — ЕОВМАТ (' ж%% ЕВКОК #%% - ЛЕСА СОМНМАМО С00Е=*у 11 


с С0 То 300. 

с, —, ПЕРЕХОД НА ОБРАБОТКУ КОНКРЕТНОЙ КОМАНДЫ 
210 60 ТО 4320,330,330,350,360), СОМАМО 

с КОД 41 =‘ ВОССТАНОВИТЬ СПИСОК ЗЕЦЕСТ , 


320 РО 325 ГЕ = 1, ттеМИМ 
ЗЕЕЕСТ(Т) = „РАЕЗЕ» 
325 — СОМТТМУЕ 
60 ТО 300 
С 


| КОДЫ 2 И 3 ТРЕБУЮТ ПРАВИЛЬНОГО КЛЮЧЕВОГО СЛОВА, 
330 — КЕУМОХ = КЕУСИК(КЕУМО 
ТЕ {КЕУМОХ «СТ. 0} 60 ТО 332 


С КЛЮЧ НЕВЕРНЫЙ = СООБЩЕНИЕ ОБ ОШИБКЕ 
МАТТЕ (РАТ,331) КЕУМО 
331 — ЕРОВМАТ (' #%% ЕВКОВ *** - ТОЕЕСАС КЕУНОВО ЗРЕСТЕТЕО:, АЗ. 


с0 та 300 
332 —1Е (СОМАМО «„ЕЧ. 31 60 ТО 340 
с 
с КОД 2 -— ДОБАВИТЬ ЭЛЕМЕНТЫ К СПИСКУ ЗЕТЕСТ 


00 335 Г = 1, `ТТЕМИМ 
ЗЕСЕСТ(Т) = ЗЕЕЕСТ(Т} „ОВ. ТТЕКЕУ(Т,КЕУМОХ} 
335 — СОМТТМОЕ 
60 ТО 300 
с Код 3 — ЛОГИЧ. УМНОЖ. ЗЕСЕСТ НА ЭЛЕМЕНТЫ, 
с СООТВЕТСТВУЮШИЕ ЗАДАННЫМ КЛЮЧЕВЫМ СЛОВАМ 
340 500 345 Г = 1, ТТАМИМ 
ЗЕСЕСТ(Т} = $ЕКЕСТ(Т} «АМО. ТТЕКЕУ (Е, КЕУМОХ} 
345 — СОМТТМОЕ 


с С0 ТО 300 
с Ад 4 — ЛОГИЧ. ОТРИЦАНИЕ СПИСКА ЗЕТЕСТ 
350 355 1 #1, ТММ 


_ ЗЕКЕСТ(Т} = «МОТ. ЗЕКЕСТ(Т) 
355 — СОМТ1МУЕ 
° 60 ТО 300 


с код 5 - ВЫВЕСТИ ВЫБРАННЫЕ ЗАГЛАВИЯ 
360 — МАТЕ (РАТ, 36 
361 — РОВМАТ ('0 Е АЕТАТЕУЕО В\ ТАТЕЗТ СОММАМО ЗЕСЦЕМСЕ АВЕ: \ /$ 
РО 365 Г = 1, ТТЕММ 
, ТЕ (МОТ. ЗЕТЕСТ(Т)} 60 ТО 365 
' РЕАО (ОЛАЕСТ®Г) ТИТСЕ 
МАТТЕ (РАТ,362) Т, ТИТЕЕ 


362. РОВМАТ (' ТИТЕЕ, 14; * 37, АТО 
365 — СОМТТМОЕ 
60` ТО 300 


с 
РТТ: 
С*$$$ ВСЕ ЗАПРОСЫ НА ПОИСК ВЫПОЛНЕНЫ — НОРМАЛЬНОЕ ОКОНЧАНИЕ $$%%% 
400 — МАПТЕ (РАТ, 401} 
401 — РОЯМАТ ('0%%* АЕ РАОСЕ$$1МС СОМРЕЕТЕО #81} 

$ТОР 
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с 
ТТТ ТРЕРРЕРРРРИТЕРРРРРЕРРЕРРРРТРРГТТ ТТТ: 
С+**= СООБЩЕНИЯ ОБ ОКОНЧАНИИ ПО ОШИБКЕ 3% 
с 
с НЕТ КЛЮЧЕВОГО СЛОВА 
7000 МА1ТЕ (РАТ,ТОО1 
7001 ЕОВМАТ (' *%*% ЕЯАОЙ #%% - МО КЕУМОЙО$ Е00мМО') 

$ТОР 
с 
с НЕТ ЗАГЛАВИЯ 
7500 МРШТЕ (РАТ, 1501) 
71501 РОВМАТ (' *+% ЕВААОЙ *#%% - МО ТТТЕЕЗ Е00МО*) 

ЗТОР 
с . 
с НЕОЖИДАННЫЙ КОНЕЦ ФАЙЛА . 
8000 МАПТЕ (РВТ, 8001) , 
3001 РОРМАТ (' **% ЕААОВ #$% - (ИМЕХРЕСТЕО ЕМО ОР ОАТА! У 

$ТОР | 

ЕКО 

ЗИВАООТТНЕ СЕТКЕУ {*) 
С охоту 
С* ВВЕСТИ И ЗАПОМНИТЬ ВСЕ КЛЮЧЕВЫЕ СЛОВА В ТАБЛИЦЕ КЕУТАВ. ЕСЛИ НЕТ * 
С* КАРТЫ (%) ОКОНЧАНИЯ КЛЮЧЕВЫХ СЛОВ» ТО ВЕТИАМ1 И ОСТАНКОВ * 

хз * 


Колка ох 


Соя у ужи жи кф. 


ТНТЕСЕЯ 1 
СНАВАСТЕК КЕУМО#6, КЕУСН+1( 8) 
СОММОМ/КЕУ/ ТВАСЕ, ОЕВИС, ВО, РАТ, ТАС, ОВС, МАЗТЕЙ, ОТАЕСТ, 


# ТТЕМТН, ТТЕМОМ, ТТЕМАХ, КЕУМИМ, КЕУМАХ, ТТЕКЕУ, ТЦТЕЕ, КЕУТАВ 


ЛИЫТЕСЕА АОЯ, РАТ, ТАС, ОВС, МАЗТЕЙ, ОТАЕСТ, ТТЕМТН 
ТМТЕСЕВ ТТЕМИМ, ТТЕМАХ, КЕУМОМ, КЕУМАХ 
+ ОСбТСАЕ ТВАСЕ, ОЕВИС, ТТЁЕКЕУ( 100.50} 
СНАВКАСТЕА ТТТЕЕ*ТО, КЕУТАВе8 (50) 
Е ЧИТУАСЕМСЕ (КЕУМО, КЕУСН(ТУ У 
1Е ТААСЕ) МАТТЕ (ТАС, 50) 
РОВМАТ (' +%® ТААСЕ ж%* ЕМТЕЙ1НС СЕТКЕ\! } 
00 100 Т * 1, КЕУМАХ 
АКЕАО (АОК,60,ЕМО=8000} КЕУМО 
РОАМАТ (АВ) 
1Е (КЕУСН(1) «ЕЙ. '#') С0 ТД 120 
ТЕ СОЕВИС) МАТТЕ (086,70) Т, КЕУМО 
РОАМАТ (* 22% 0ЕВЦИС х$%$ КЕУМОЛО МИМВЕК', 13, * 716 #, АЗ} 
КЕУТАВ(Т) > КЕУМО 
СОМТТМИЕ 


СУЩЕСТВУЕТ КАК МИНИМУМ КЕУМАХ ЭЛЕМЕНТОВ 
1 = КЕУМАХ+1Т 


УБЕДИМСЯ. ЧТО НАШЛИ % › ИГНОРИРОВАТЬ ВСЕ СВЕРХ КЕУМАХ 
КЕАО (ВОА,60,ЕМО=8000) КЕУНО 
1Е (КЕУСН(1) «МЕ. '%') 60 ТО 110 
КЕУМОМ =Т-1 
1Е (ТААСЕ) МАТТЕ (786,130) 
ЕОАМАТ ('’ $$+ ТААСЕ +%% ЕХ(ТТМС СЕТКЕУ - НОКМАЕ ВЕТИАМ® ) 
АЕТИАМ 


НЕОЖИДАЕМЫЙ КОНЕЦ ФАЙЛА, СООБЩЕНИЕ ОБ ОШИБКЕ 
1Е (ТААСЕ) МА1ТЕ (ТАС, 8001) 

РОЯМАТ {' #%% ТААСЕ +$%% ЕХТТ[МС СЕТКЕУ = ЕМО ОЕ ВРАТА КЕТИЯАМ! 
АЕТИВМЕ 

ЕМО 


ЗИВЯбИТТМЕ СЕТТУЕ 


С* ВВЕСТИ ЗАГЛАВИЯ. ЗАПИСАТЬ ИХ В ФАЙЛ С ПРОИЗВОЛЬНЫМ ДОСТУПОМ. 

Сж В КАЖДОМ ЗАГЛАВИИ ОПРЕДЕЛИТЬ, КАКОЕ ОНО СОДЕРЖИТ КЛЮЧЕВОЕ 
С* СЛОВО. ЕСЛИ 1-ОЕ ЗАГЛАВИЕ СОДЕРЖИТ К-ОЕ КЛЮЧЕВОЕ. слово. 

Сж ТО. УСТАНОВИТЬ ТТЕКЕТ(Т К) В ТВИЕ 

С* ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: ХТРАСТ 

сх ижжжх жж ххх ку иж 


Продолжение Рис. 4.9. 


222 


Гл. 4. Ввод/вывод: магнитные ленты и диски 


ТМТЕСЕА Т 
СОММОМ/КЕУ/ ТЯАСЕ, ОЕВИС, ВОЙ, РАТ, ТАС, 0686, МАЗТЕВ, ОТАЕСТ, 
ж ТТЕМТН, ТТЕМУМ, ТТЕМАХ, КЕУМОМ, КЕУМАХ», ТТАКЕУ, ТИТЬЕ, КЕУТАВ 
ТНТЕСЕВ АОА, РАТ, ТАС, 08С, МАЗТЕЯ, ОТАЕСТ, ТТЕМТН 
ТМТЕСЕВ ТТЕММ, ТТЕМАХ, КЕУМУМ, КЕУМАХ 
\ОСТСАЕ ТААСЕ, ОЕВИб, ТТЕКЕУ(100, 50) 
СНАВАСТЕВ ТТТЕЕ*ТО, КЕУТАВ+В (50 } 
1Е (ТВАСЕ) МА1ТЕ (ТАС, 50) 
РОВМАТ (' #+*% ТААСЕ *ж**% ЕМТЕВТМС СЕТТТЬ* ) 
0 100 Т = 1, ТТЕМАХ 
АЕАО (МАЗТЕА, 60, ЕМО=200) ТТЕЕ 
ЕОКМАТ (АТО) 
ТЕ (ОЕВИС) МА1ТЕ (085,70) Т, ТИТЕЕ 
ЕОРМАТ (' ++ж ОЕВИС +%* Т1ТЕЕ МОМВЕВ!'., 1%, ' 1$5:', АТОЙ 
МЕТТЕ (ОТАЕСТ' ТГ) Т1ТТЕЕ 
САЕЕ ХТААСТ (Т) 
`СОМТТМИЕ 
НЕ БОЛЬШЕ ТТЕМАХ ЗАГЛАВИЙ, ИГНОРИРОВАТЬ 
ЛЮБОЕ СВЕРХ ЭТОГО КОЛИЧЕСТВА 
1 = ТТЕМАХ+1 
ТТЕМИМ = 1-1 
ТЕ (ТААСЕ) МАТТЕ (ТАС,210) 
РОЯМАТ (' +**% ТЯАСЕ *ж%*% ЕХИТИМС СЕТТТЬ! 
АЕТИВМ 
ЕМО 


ФОВАБОТТМЕ ХТААСТ (Г) 


Се киа 
С+х ИЗВЛЕЧЬ ВСЕ СЛОВА ИЗ 1-ГО ЗАГЛАВИЯ. ДЛЯ КАЖДОГО ВСТРЕТИВШЕГОСЯ 
С* КЛЮЧЕВОГО СЛОВА УСТАНОВИТЬ ЗНАЧЕНИЕ СООТВЕТСТВУЮЩЕГО ЭЛЕМЕНТА 
С* В МАТРИЦЕ ПОИСКА ТТЕКЕУ 


С* ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ * МЕХТУО, КЕУШК 
С жж 


ТМТЕСЕВ С0, Т, 3 
СНАВАСТЕА КЕУМО*В 
СОММОМИКЕУ/ ТВАСЕ, ОЕВИб, ВОВ, РАТ, ТАС, 08С, МАЗТЕК, ОТАЕСТ, 


% ТТЕМТН, ТТЕМУМ, ТТЕМАХ, КЕУМИМ, КЕУМАХ, ТТЕКЕУ, ТИТЕЕ, КЕУТАВ ° 


ТМТЕСЕВ АОК, РЕТ, ТАС, ОВС, МАЗТЕВК, О1ВЕСТ, ТТЕМТН 
ТМТЕСЕА ТТЕММ, ТТЕМАХ, КЕУМИМ, КЕУМАХ 

ТОСТСАС ТКАСЕ, ОЕВУС, ТТЕКЕУ( 100,50} 

СНАРАСТЕВ ТТТЬЕ*%ТО, КЕУТАВЖВ (50) 

{Е (СТААСЕ) МАТТЕ &ТАС,50) Т 

РОВМАТ (* ж** ТААСЕ +** ЕМТЕВТМС ХТААСТ, Т1=', 13} 


ПОКА НЕТ КЛЮЧЕВЫХ СЛОВ 
00 100 4 = 1, КЕУМУМ 
ТТЕКЕУ(Т,3} = ›РАСЗЕе 
СОМТТНИЕ 


НАЧИНАЯ © КОЛОНКИ 1» СКАНИРУЕМ ПЕРФОКАРТУ 
СЕ = 1 


НАХОДИМ СЛЕДУЮЩЕЕ СЛОВО, ЕСЛИ НЕТ» ПЕРЕХОД НА 300 
СА. МЕХТЫО (300, СОЬ, КЕУМО) 
КЕУМОХ = КЕУБИК(КЕУНО) 
ТЕ <{КЕУМОХ ›ЕЙ. 0} 60 ТО 200 


НАЙДЕНО КЛЮЧЕВОЕ СЛОВО - ОТМЕТИМ В МАТРИЦЕ 
ТТЕКЕУ(Т,КЕУМОХ) = «ТВОЕ» 
50 Та 200 


ЗАГЛАВИЕ МОПНОСТЬЫЮ ПРОСМОТРЕНО == ВОЗВРАТ 
ТЕР (ТААСЕ) МВ1ТЕ (ТАС,301} 
ЕОЙМАТ (' ж%* ТААС= ж%% ЕХТТТМС ХТААСТ' } 
АЕТОЗМ 
ЕМО 
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+ ичих 


Пример 


(/  ЗОВВООТТМЕ МЕХТМО (*, СОЁ, \/ОВО) 
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С зжижжкижжж к жж яж жжжжжжжчхж 


С* НАЧИНАЯ С КОЛОНКИ 'СО', НАХОДИМ СЛЕДУЮЩЕЕ СЛОВО В ДАННОМ 
С*ж ЗАГЛАВИИ. ЕСЛИ ОНО БОЛЬШЕ 8 ЛИТЕР. УСЕКАЕМ ЕГО ДО В. 

С*+ 'С0' УКАЗЫВАЕТ НА ЛИТЕРУ ПОСЛЕ НОВОГО СЛОВА 

С* НОВОЕ СЛОВО ЗАПИСАНО В ПАРАМЕТР "ОВО" 

С* ЕСЛИ СЛЕДУЮЩЕГО СЛОВА НЕТ — ВЕТУВМ 1 


Ск жж жж жжяжжжжщ жж жж жжжжжж 


с 


1 НТЕСЕВ СОК, Т, 3 
СНАРАСТЕК МОАО+в, СНАВ$*1(8), №08, ТТЕСН=1( 70) 
СОММОМИКЕУ/ ТААСЕ, ОЕВИСб, ВОВ, РАТ, ТВС, 08С, МАЗТЕЯ, ОТ1ВАЕСТ, 


# ТТЕМТН, ТТЕММ, ТТЕМАХ, КЕУМОМ, КЕУМАХ, ТТАКЕХ, Т1ТЕЬЕ, КЕУТАВ 


|МТЕСЕВ ВОВ, РАТ, ТВС, ОВС, МАЗТЕА, ОТВЕСТ, ТТЕМТН 
МТЕСЕВ ТТЕМОМ, ТТЕМАХ, КЕУМОМ, КЕУМАХ 
1 ОСТСАЕ ТААСЕ, ОЕВИС, ТТЕКЕУ( 100,501 
СНАРАСТЕВ Т1ТЕЕФТО, КЕУТАВ®8(50) 
ЕСИТУАСЕМСЕ (МО,СНАВ$ (1), (ТТТЬЕ,ТТЕСНСИ)) 
ТЕ (ТААСЕ) МАТТЕ (ТВС,50) СО% 
50 ЕОРМАТ (' +*%* ТААСЕ *$* ЕМТЕАТМС МЕХТМО, СОЬ=', 123 
С 
с ЕСЛИ УЖЕ ПРОШЛИ КОНЕЦ ЗАГЛАВИЯ, ВОЗВРАТ 
ТЕ &СОЕ „СТ. ТТЕМТН) 60 ТО 120 
с . 
С ИЩЕМ СЛЕДУЮЩУЮ ЛИТЕРУ. НЕ ПРОБЕЛ 
00 100 Г = СО, ТТеМТН 
ТЕ (ТТЕСН(Г, „МЕ. * ') 60 ТО 150 
100 — СОМТТМОЕ 


С ОСТАТОК КАРТЫ — ПРОБЕЛЫ 
120 ТЕ (ТААСЕ) МАТТЕ (ТВС, 121} 
121 ЕОВМАТ (* +*% ТААСЕ +%* ЕХИТТМС МЕХТМО, МС МЕМ МОКО ЕСЦМО* $} 


ВЕТИВМЕ - — 
с СЛОВО НАЙДЕНО, 
с ОЧИСТИТЬ ОБЛАСТЬ ПРОБЕЛАМИ 


150 МО = '' 
00 200 4=1, 8 
ТР 64(1%4-1) „СТ. ТТЕМТНУ 60 ТО 250 
ТЕ (ТТЕСН!1+-1) „ЕО. * #) 60 ТО 250 
СНАВ$ (4) = ТТЕСН(Т+-1} 
200 СОМТТМИЕ 


с СЛОВО МОЖЕТ БЫТЬ ДЛИННЕЕ 8 ЛИТЕР, 
| ИГНОРИРОВАТЬ ОСТАТОК 
} = 1+8 


00 225 СОЁ = 4, ТТЕМТН 
ТЕ (ТТЕСНССОЕУ „ЕД. ' ') 60 ТО 306 
225 СОМТТМИЕ 
СОЁ = ТТЕМТНеТ 


СО ТО 300 
с СЛОВО ИМЕЕТ ДЛИНУ МЕНЕЕ 8 ЛИТЕР, 
с УСТАНОВИТЬ СО. 
250 — СОЁ = 1441 
С . 
с ПЕРЕСЛАТЬ НАКОПЛЕННЫЕ ЛИТЕРЫ № ово" 


300 —МОВО = м0 
1Е 4ТААСЕ) МА1ТЕ (ТАС,350) НОВО 

350 — ЕРОВМАТ (' $%* ТААСЕ %%% ЕХ[ТИТМС МЕХТМО, МОВО=*, АВ} 
ВЕТИВМ 
ЕМО 


ТМТЕСЕВ ЕОМСТТОМ КЕУСИК (409А0} 


С зу 


С* ЕСТЬ ЛИ 'МОВО' В СПИСКЕ КЛЮЧ. СЛОВ. ЕСЛИ НЕТ, ВЕРНУТЬ 0, 
СФ ЕСЛИ ДА- ВЕРНУТЬ ИНДЕКС СООТВЕТСТВУЮЩЕГО КЛЮЧЕВОГО СЛОВА 


С зонах ау 


с 


Продолжение Рис. 4.9. 
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СНАРАСТЕВ МОВО+8 
СОММОН/КЕУИ ТААСЕ, ОЕВИС, РОК, РАТ, ТАС, 086, МАЗТЕЙ, О1ВЕСТ, 
% ТТЕМТН, ТТЕМИ, ТТЕМАХ, КЕУМИМ, КЕУМАХ, ТТЕКЕУ, ТЦТЬЕ, КЕУТАВ 
ТМИТЕСЕК ВОВА, РАТ, ТАС. 08С, МАЗТЕВ, ОТВЕСТ, ТТЬНТН 
ТМТЕСЕВ ТТЕМИМ, ТТЕМАХ, КЕУМИМ, КЕУМАХ 
«ОСТСАЕ ТВАСЕ, ОЕВИС, ТТЕКЕУ( 100,50} 
СНАВАСТЕВ Т1ТЕЕ*ТО, КЕУТАВ+В (50) 
1Е (ТААСЕ) МАТТЕ (ТАС,50) МОВО 
50 ЕОВМАТ &* +#%%`ТВАСЕ *** ЕМТЕВИМС КЕУКИК, МОВОж!, АВ} 
00 100 КЕУКОК = 1, КЕУМОМ 
ТЕ (КЕУТАВ(КЕУКУК) „ЕЯ. МОВО} 60 ТО 200 
100 — СОМТТМУЕ 
КЕУКОК = 0 | 
200 — ТЕ (ТААСЕ) МАТЕ (ТАС,201) КЕУШОК 
201 — ЕОВМАТ &\ ж** ТВАСЕ *** ЕХ1Т1МС КЕУЁЬОК, АЕТУВМ УАСОЕ=*, 12) 
ВЕТИАМ 
ЕМО 


ВЕОСК ВАТА 
С жеиккжкки жа жжях 


с. ИНИЦИАЛИЗАЦИЯ ОБЩИХ ОБЛАСТЕЙ: 


КОК = 5 — СНОМЕР КАНАЛА ВЕАОЕК ТВМ 360-370 
с* РАТ = 6 $ НОМЕР КАНАЛА `РАТМТЕВ ТВМ 360-370 
С*  МАЗТЕВ = 11 НОМЕР КАНАЛА ДЛЯ ФАЙЛА ЗАГЛАВИЙ 
с*®  ОТАЕСТ = 12  ЗНОМЕР КАНАЛА ДЛЯ ФАЙЛА С ПРОИЗВОЛЬНЫМ ДОСТУПОМ 
Сс* ОВС = 6 *ОТЛАДОЧНЫЙ ВЫВОД ВМЕСТЕ СО СТАНДАРТНОЙ ПЕЧАТЬЮ 
С* ТАС = 6 :ТРАССИРОВКА ВМЕСТЕ (СО СТАНДАРТНОЙ ПЕЧАТЬЮ 
с*  ТВАСЕ = ТВОЕ *ПРОСЛЕЖИВАНИЕ ВСЕХ ВХОДОВ И ВЫХОДОВ ИЗ ПОДПРОГРАММ 
С*  ОЕВИС = ТАЦЕ: ВКЛЮЧИТЬ ВСЕ. ОТЛАДОЧНЫЕ СООБЩЕНИЯ 


С= — ТТЕМАХ = 100 СРАЗРЕШЕНО НЕ БОЛЕЕ 100 ЗАГЛАВИЙ 
С* — КЕУМАХ = 50 ЗНЕ БОЛЕЕ 50 КЛЮЧЕВЫХ СЛОВ 
С* — ТТЕМТН = 70 СДЛИНА НЕ БОЛЕЕ 70 ЛИТЕР 
С жа ьиих 2 вх ааа а хаки 
СОММОМИКЕУ/ ТААСЕ, ОЕВОб, КОЯ, РАТ, ТАС, 086, МАЗТЕЯ, ОТАЕСТ, 
ж ТТЕМТН, ТТЕМИМ, ТТЕМАХ, КЕУМОМ, КЕУМАХ, ТТАКЕУ, Т(ТЕЕ; КЕХТАВ 
ТМТЕСЕЯ ВОВ, РАТ, ТАС, 086, МАЗТЕВ, ОТВЕСТ. ТТЬМТН 
ТНТЕСЕВ ТТЕМИМ, ТТЕМАХ, КЕУМИУМ, КЕУМАХ 
Ц ОСТСАЕ ТВАСЕ, ОЕВУС, ТТЕКЕУ (100,50) 
"СНАВАСТЕВ Т1ТЕЕ*ТО, КЕУТАВ +8 (50) 
ОАТА РОВ/5/И, РАТ/б/, МАЗТЕРИ11/, ОТАЕСТ/12/: 080/6/з ТВСГеР, 
ФАТА ТААСЕИ.ТАИЕ,/, ОЕВИСИ.ТВИЕ. / 
ОАТА ТТЕМАХ/100/; КЕУМАХ/50/, ТТЬНТН/ТО4 
ЕМС .. 


яичная них 


Продолжение Рис. 4.9. 2 


Упражнения 


4.01. Какой «бит нечетности» следует присоединить к следующим 8-разрядным 
кодам на 9-дорожечной магнитной ленте? 


(а) 10111011 
(6) ИИИИ 
(в) 01000000 
(г) 00000000 


4.02. Предположим, что межблочные промежутки на магнитной ленте состав- 
ляют 1/2 дюйма, данные записаны с плотностью 800 р: и лента имеет длину 
2400 футов. 

(а) Если говорят, что 75% ленты используется эффективно, то сколько литер 
запоминается в отдельном блоке (при условии что все блоки одного размера)? 
(6) Если мы предполагаем увеличить коэффициент полезного использования 
ленты до 90%, какой длины должен быть каждый блок? 


4.03. Форматные записи в системе РЕС-10 оканчиваются маркером конца 
записи. . Почему э этот г способ не принят для бесформатных записей? 
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4,04. Предположим, что в программе для 1ВМ 360-370 выполняется инструк-_ 
ЦИЯ 


РЕРНИМЕ ЕШ.Е 12 {199,40,Р.,112) 

или в программе для ОЕС-10 — инструкция 
САГЕ РЕРПУЕ ЕШЕ (12,40,112,’ВАМР.РАТ’) 

(а) Чему равно значение целой переменной 112 после выполнения инструкции 
КЕАО (12’15,100) РАТА 


(6) Какое значение имеет переменная 1]2 после выполнения последователь- 
ности инструкций 


\ЕТЕ (126,200) РАТА 
РИМО (12'22) 


4.05. Имеет ли смысл выдавать команду ВЕ\ЗМ/ ИМО с номером устройства, ас- 
социированным с последовательным набором данных, хранящимся на уст- 
ройстве прямого доступа? Объясните ваш ответ. 


4.06. Имеет ли смысл выдавать команду ВЕМ/ ПМО для файлов прямого доступа? 
Объясните ваш ответ. 


4.07. Предположим, что необходимо выбрать устройство для записи последо- 
вательного набора данных. Укажите достоинства и недостатки магнитных лент 
или дисков. 


4.08. Рассмотрите ОО)-команды ОЗ/ТСГ. 1ВМ 360-370: 


Ч7ЕТОБЕО01 00 $У$00Т=А 

“/ЕТ10Е00Х 20 ТАРО ЗН МЕМОАТА УС ЗЕВ-МУТАРЕ ТАВЕСЯв О ЗРяНЕИ» 
ОСВ=(ВЕСЕМ= /В 1 ВЕСЕ=84,В1К$17Е=256} 

//ЕТ12Е001 00 ИМТ=ТАРЕ. 015 Р=МЕМ, 0$ М=МОООАТА» УОЕ=$ Е =ОТНЕВ, 

Ра ТАВЕС= (3, №), ОСВ= (КЕСЕМ=ЕВ,1ВЕСЕ=60, 81 К51Е=1200% 

//ЕТ14Р001 ОБ ИМТТ=$У$0АзО5М=ОТ$КОАТА, ОТ5Р= (МЕН САТЬС) з 

Ра ЗРАСЕ={ 200,(20,2}}» 

РГ ОСВ= (ДЕСЕМ=Е.1ЕС1=200,ВЫКЗТИЕ=200Ъ 


(а) Какой тип устройства связан с номером 6? 

(6) Что означает 10 в ЕТ10Е001? 

(в) Нарисуйте или объясните формат каждой записи в шестом файле ленты 
с именем МУТАРЕ. 

(г) Нарисуйте формат каждой записи в третьем файле ленты с именем ОТНЕК. 
(д) МУТАРЕ и ОТНЕК используют метки? 

(е) Что означаютётри величины 200, 20 и:2 в параметре ЗРАСЕ==(200, (20, 2))? 
(ж) Напишите ОЛ-команду, которую можно использовать для доступа к вновь 
созданному набору данных О15КОАТА с номером устройства 8 при последую- 
щих выполнениях программы. 


4.09. Напишите ОЛ)-команду, необходимую для создания помеченного файла 
на магнитной ленте с именем МПМЕ. Магнитная лента уже содержит четыре 
набора данных. Новый файл располагается за четвертым файлом. Его имя 
МУЛАТА. Каждая запись имеет длину 100 литер и сблокирована в физические 
блоки по 10 записей в блоке. К файлу обращаются по номеру устройства 9. 


4.10. Предположим, что выдана следующая последовательность команд: 


.МОПМТ МТА:14/ВЕЕГЛО:МИМЕ/ВОМЕУ 
.5КР 14:2 ЕШЕ$ 


(а) Что означают 14, ММЕ и ВОМГУ? 
(6) Где найти файл? 


4.11. Предположим, что требуется записать файл в конце всех файлов, находя- 
щихся на магнитной ленте с именем ТАРЕ1. Напишите последовательность 
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команд в системе ОЕС-10 так, чтобы для этих целей можно было использовать 
канал 8. 


4.12. Напишите необходимую команду в системе ОЕС-10, если для обработки 
набора данных на диске используется канал 9. 


4.13. Напишите программу, которая обрабатывает файл на магнитной ленте, 
содержащей 60-литерные записи. Каждая такая запись состоит из 20-литерного 
поля имени, за которым расположено 40-литерное поле адреса. Ваша программа 
вначале должна читать все записи, отмечая каждое отдельное имя и число 
появлений этого имени. Затем необходимо вновь прочитать файл, печатая 
последнюю запись, связанную с каждым именем. 


4.14. Требуется написать систему заказа авиационных билетов. Входом в про- 
грамму служит набор перфокарт, каждая из которых имеет следующую струк-` 


туру: 


Позиции: Записанная информация: 
|—20 Имя пассажира 
21—60 Домашний адрес. 
61—70 Номер телефона 

71 Рейс 1 

72 Рейс 2 

73 Рейс 3 


Перфокарта, завершающая указанный набор перфокарт, содержит в поле имени 
пассажира 20 звездочек. Система обслуживает не более 100 пассажиров. Каж- 
дая входная запись (кроме перфокарты, содержащей 20 звездочек) выводится 
на дисковый файл с произвольным доступом. Кроме того, следует создать не- 
сколько таблиц. Первая таблица МАМЕ$ (имена) содержит «А» в элементе 
МАМЕЗ (К), если «А» — имя пассажира К-й записи. Вторая таблица ВКЕЗЕКУ 
(заказанные) содержит К в элементе КЕЗЕКУ (1, Г) в случае, если пассажир 
из К-й записи является Г-м пассажиром 1-го рейса. Можно предположить, что 
ни один рейс не принимает более 25 пассажиров. Поэтому КЕЗЕКУ объяв- 
ляется целым массивом размером 9 на 25. Вначале установите в ноль все 
элементы массива КЕЗЕКУ, чтобы указать, что вначале не было пассажиров 
ни на один рейс. 


Вслед за перфокартами резервирования вы вводите ряд команд. 
Каждая перфокарта, содержащая команду, имеет следующую структуру: 


Позиции: Записанная информация: 

1—4 Код команды 

5—24 Имя пассажира (не используется с САМС, РЮТМТ) 
25 Номер рейса (не используется с ГМО) 

26—65 Домашний адрес (не используется с АБО) 

66—75 Номер телефона (используется только с АОО) 


Ваша программа должна интерпретировать команду и печатать соответствую- 
щий вывод для каждой команды. 


Разрешены команды: 

АБР — Записать пассажира на рейс. Необходимо проверять рейс на пере- 
полнение, а пассажиру разрешать резервирование билетов не более 
чем на три рейса. | 

РЕГЕ — Вычеркнуть пассажира из некоторого рейса. Необходимо следить 
за попытками вычеркнуть пассажира из неназначенного рейса. 

САМС — Отменить резервирование мест для всех пассажиров данного рейса. 

РКМТ — Напечатать список всех пассажиров на данный рейс. 

[№0  — Напечатать адрес, номер телефона и номера рейсов, на которые за- 
казано место для данного пассажира. 

СОМЕ — Указать, зарезервирован или нет билет данному пассажиру на опре- 
деленный рейс. 


Глава 5 


СТРУКТУРЫ ДАННЫХ 


Вы уже познакомились со всеми выполняемыми инструкция- 
ми языка Фортран. Несмотря на то что число различных типов 
инструкций невелико, язык тем не менее оказывается полезным 
при решении широкого круга вычислительных задач. Силу Форт- 
рана определяют не инструкции сами по себе, а то, как они ис- 
пользуются при решении задач. Подобно тому как программисты 
сконструировали синтаксические структуры типа 1Е-ТНЕМ-ЕТ- 
ЗЕ или САЗФЕ, описанные в гл. 1, были найдены также методы 
для представления отношений между элементами данных. В этой 
главе мы рассмотрим некоторые структуры, полезные для пред- 
ставления и обработки данных, в программах на языке высокого 
уровня. 


5.1. Списки 


Списки лежат в основе большинства структур данных. Сиис- 
ком называется упорядоченный набор элементов данных. Список 
имеет единственный первый элемент, называемый головой списка, 
а также последний элемент, называемый хвостом списка. Каждый 
элемент списка, кроме головы, имеет единственного предшест- 
венника, и каждый элемент, за исключением хвоста, имеет един- 
ственного преемника. Материальными примерами списка могут 
служить телефонный справочник или картотека. Из этих приме- 
ров следует, что отдельный элемент списка может состоять из 
нескольких компонентов; каждая запись в телефонном справоч- 
нике, например, содержит фамилию, адрес и номер телефона. 
Каждый элемент данных называется записью, или узлом, или эле- 
ментом списка. Компоненты записи называются полями. 

Над списками обычно допускаются следующие операции. 


Вставить узел в список. 

Исключить узел из списка. 

Соединить два списка в один. 
Разбить один список на два. 

Вывести (напечатать) все узлы списка. 


ло» 
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6. Найти узел, содержащий определенное значение в некото- 
ром поле. | и | 

7. Упорядочить узлы списка в соответствии со значениями 
некоторого поля. 


Наиболее распространенной формой списка является после- 
довательный список, который можно представить массивом языка 
Фортран. В последовательном списке каждый элемент физиче- 
ски располагается вслед за своим предшественником. Многие из 
программ, которые мы рассмотрели в предыдущих главах, вы- 
полняют указанные выше операции над последовательными спи- 
сками. В этой главе мы рассмотрим некоторые разновидности по- 
следовательных списков, а также несколько других типов спи- 
СКОВ. 


5.2. Стеки 


Представьте себе магазин, где продается множество разнооб- 
разных товаров. Когда товар на полках кончается, служащие 
выкладывают вновь поступившие изделия. Обычно они выстав- 
ляют новый товар, когда осталось еще немного прежнёго товара, 
поскольку лучше не допускать, чтобы полки были совсем пус- 
ТыМи. 

Новые изделия могут иметь другую цену, но служащие вы- 
кладывают на полки изделия с разными ценами, полагая, что 
покупатели сначала раскупят товар по более низкой цене. Если 
старые товары запылились или помялись, то покупатели в пер- 
вую очередь возьмут новый товар, пусть даже более дорогой. 

Владельцу магазина в любой момент желательно иметь инфор- 
мацию о суммарной стоимости всех товаров, имеющихся в про- 
даже в его магазине. В магазине, где продается много дешёвых 
товаров (например, в бакалейном магазине), вряд ли реально 
хранить записи, скажем, о том, продана ли банка груш ценой 
29 центов, выпущенная 15 июня, или банка груш ценой 31 цент, 
выпущенная 8 июля. В некоторых случаях это вообще невозмож- 
но, поскольку, например, яблоко, сорванное 15 июня, нельзя 
отличить от яблока, сорванного 18 июня. 

Для определения общей стоимости имеющихся товаров в нё- 
которых магазинах применяется метод, называемый РО. Аб- 
бревиатура ГЛЕО означает «ГазЁ ш, Еигз{ Оиф (последним при: 
шел — первым ушел), т. е. считается, что товар, поступивший 
позже, продается в первую очередь. Такой метод учета можно 
реализовать при помощи структуры данных, называемой стеком. 

Стек — это список, в котором включения и исключения про- 
изводятся только с одного конца. Когда элемент помещается на 
стек, то элемент, ранее находившийся на вершине стека, стано- 
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вится временно недоступным. Когда мы удаляем из стека этот 
новый элемент, то предыдущий элемент, который был недоступен, 
вновь оказывается на вершине стека. Операции включения и ис- 
‘ключения из стека называются соответственно «положить на 
стек» и. «взять со стека» !). 


Втолк. Вытолк, Втолк.  Втолк. Вытолк. Вытоилк. Вытоик, 
В (В) С | (0) (С) А 


Рис. 5.1. Операции со стеком. 


Стопка подносов в кафетерии ведет себя, как стек. Чистые под- 
носы помещаются на вершину стека, и посетители берут подносы 
сверху. В некоторых кафетериях есть пружинные механизмы для 
хранения подносов, так что операции «положить» (втолкнуть) 
и «взять» (вытолкнуть) связаны с физическим продвижением ос- 
татка стека. На рис. 5.1 показано несколько операций со стеком. 
Заметим, что элементы берутся со стека не в том порядке, в кото- 
ром их туда помещали, а в обратном. 


РТ ттг фосссиа 


Вершина Вершина 


Рис. 5.2. Реализация стека с помощью массива. 


При моделировании движения товаров в магазине методом 
«последним пришел — первым ушел» используется по одному 
стеку на каждый вид товара. Как только поступает новая партия 
товара, на стек для этого вида товара помещается элемент, со- 
держащий количество и цену вновь поступившего товара. По 
мере распродажи товара проданное количество вычитается из 
верхнего элемента стека; когда количество в верхнем элементе 
стека становится нулевым, этот элемент удаляется из стека, а 
остаток вычитается уже из нового верхнего элемента. Общая стои- 
мость товара вычисляется путем перемножения количества това- 
ра в каждом элементе стека на его цену и суммирования по 
всем элементам. | 


т) В оригипале «ризП» (втолкнуть) и «рор» (вытолкнуть). Стек можно пред- 
ставлять себе как пружинный механизм — «магазин»; отсюда и термины «втол- 
кнуть» и «вытолкнуть».— Прим. перев. 


УХ 
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Стек удобно представлять в Фортране при помощи массива 
и указателя на верхний элемент. Мы будем изображать стек, 
считая, что свободное пространство находится не в нижней час- 
ти массива, как на рис. 5.1, а в верхней. Далее, вместо того 
чтобы перемещать все данные в стеке всякий раз, когда добав- 
ляется новый элемент, мы просто будем продвигать указатель 
вершины стека. Наконец, мы будем изображать стек «лежащим 
на боку», так что низ у него окажется слева, а вершина — спра- 
ва. На рис. 5.2 изображен стек до и после того, как на него был 
помещен элемент 5. 

Если стек реализуется массивом фиксированного размера, то 
возникает неизбежная проблема — нужно следить, чтобы на стек 


ЗОВЮКОЦТ{МЕ $ТКОР$ (+, ЗТАСК, $ТК$12, $ТКТОР, РАТА) 
[МТЕСЕВ $ТК$12, ЗТКТОР, ЗТАСК(5ТК$12), РАТА 
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ЭТОТ ВХОД СЛУЖИТ ДЛЯ ПОМЕЩЕНИЯ ЗНАЧЕНИЯ ПЕРЕМЕННОЙ “РАТА”— 
НА ВЕРШИНУ СТЕКА (МАССИВ “5ТАСК»”). 

ЕСЛИ СТЕК ПЕРЕПОЛНИЛСЯ, ТО АЛЬТЕРНАТИВНЫЙ ВОЗВРАТ КЕТОВМ 1.— 
ПРИ УСПЕШНОМ ВЫПОЛНЕНИИ ОПЕРАЦИИ $ТКТОР БУДЕТ УКАЗЫВАТЬ— 
НА НОВУЮ ВЕРШИНУ СТЕКА. — 
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$ТКТОР = $ТКТОР+Т 
ЗТАСК(ЗТКТОР) = РАТА 
ВЕТИАМ 
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© ЭТОТ ВХОД СЛУЖИТ ДЛЯ УДАЛЕНИЯ ТЕКУЩЕГО ВЕРХНЕГО ЭЛЕМЕНТА СТЕКА 
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И ПРИСВАИВАНИЯ ЕГО ЗНАЧЕНИЯ ПЕРЕМЕННОЙ „ОАТА®. 


С ЕСЛИ НЕХВАТКА В СТЕКЕ, ТО АЛЬТЕРНАТИВНЫЙ выход, ВЕТИАН 1. 
С ПРИ УСПЕШНОМ ВЫПОЛНЕНИИ ОЛЕРАЦИИ ЗТКТОР БУДЕТ УКАЗЫВАТЬ 
С НА НОВУЮ ВЕРШИНУ СТЕКА. 
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о © © © ® © ПРОВЕРКА НА НЕХВАТКУ В СТЕКЕ 
ЧЕ (5ТКТОР о1Е› 0) ВЕТ 


К ье › › » » НЕХВАТКИ НЕТ,  ЯТЬ " ЛЕМЕНТ СО СТЕКА 


ДАТА = ЗТАСК(ЗТКТОР) 
ЗТКТОР = $ТКТОР-1 
. ЗЕТОВН 


Рис. 5.3. Подпрограмма операций со стеком. 
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ЭТОТ ВХОД -— ДЛЯ ИНИЦИАЛИЗАЦИИ СТЕКА. - 
с УТАЗАТЯЛЬ ВЕРШИНЫ И ВЕСЬ СТЕК ЗАПОЛНЯЮТСЯ НУЛЯМИ. р 


С ВЫХОД ВЕТОВМ 4_И ПАРАМЕТР „АТА НЕ ИСЗ Я, ии шнм 


$ТКТОР = 0 
00 10 Т = 1, $ТК$ТА 
УТАСК(Т} = 0 
16 СОМТТМУЕ 
ВЕТИВМ 
ЕМО 


Продолжение Рис. 5.3. 


не помещали элементов больше, чем может уместиться в массиве. 
Такая ситуация называется переполнением стека. Противопо- 
ложная ситуация — недостаток в стеке — возникает, когда пы- 
таются взять элемент из пустого стека. В программах для работы 
со стеком необходимо проверять оба эти условия. 

Рассмотрим теперь подпрограмму (ЗТКОР$, рис. 5.3), в ко- 
торой реализованы операции со стеком; каждой операции в под- 
программе соответствует точка входа. Операции «положить на 
стек» (втолкнуть) и «взять со стека» (вытолкнуть) реализованы 
в точности так, как описано выше. Точками входа для них яв- 
ляются ЗТКРЗН и ЗТКРОР. 

Еще одна точка входа (ЗТКИМТ) нужна для инициализации 
стека. Поскольку указатель вершины стека должен ссылаться на 
текущий верхний элемент, то пустой стек будет представлен 
значением ЗТКТОР=0. Нет необходимости инициализировать 
сам стек, так как при каждой операции «положить» изменяется 
содержимое ячейки ЭТАСК (ЗТКТОР- 1). Для отладки, однако, 
полезно распечатывать содержимое всего стека или первые не- 
сколько его элементов и уметь отличать элементы стека от не- 
инициализированных позиций в нем. По этой причине в програм- 
ме инициализации заполняются нулями переменная ЗТКТОР 
и весь стек. 

Теперь вы, несомненно, сумеете написать программу, которая 
бы читала карты, содержащие количество поступившего товара 
и его цену или количество проданного товара, и определяла сум- 
марную стоимость товара путем просмотра стека. | 

Стеки являются примером динамических структур данных; 
это означает, что структура во время выполнения программы ло- 
гически растет или сокращается. Поскольку эта структура реа- 
лизуется в Фортране при помощи простых переменных и масси- 
вов, то она фактически не меняет своего размера, так как пере- 
менные и массивы сохраняют постоянный размер. Меняется же 
размер используемой в каждый момент времени части массива. 
Ограничения, связанные с реализацией стека переменного разме- 
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ра при помощи массива фиксированного размера, обычно ока- 
зываются не слишком обременительными, поскольку в большин- 
стве приложений можно разумно оценить максимальный возмож- 
ный размер стека. 


5.3. Очереди 


Система «последним пришел — первым ушел» для учета това- 
ров не реалистична. Владельцы магазинов не захотят задержи- 
вать у себя большое количество старых товаров. Обычно, раскла- 
дывая на полках товары, они помещают более новые изделия по- 
зади старых, чтобы товары не успели слишком состариться, преж- 
де чем их продадут. Это особенно важно для скоропортящихся 
или сезонных товаров. В подобных случаях более подходящей 
оказывается система учета ЕТРО. В такой системе предполагает- 
ся, что всякий раз продается наиболее старое из имеющихся из- 
делие данного типа. Сокращение ЕТЕО означает “Ет$ё ш, Еи& 
Оц{:” (первым пришел — первым ушел), т. е. удаляется всегда 
самый старый элемент. Такая система моделируется очередью. 


($) Исключить (31) (г) Исключить (12) 


Рис. 5.4. Операции с очередью. 


Очередь — это структура данных, в которой элементы добав- 
ляются всегда с одного края, а удаляются с другого. Край, в ко- 
тором выполняются включения, называется концом очереди, а 
край, в котором производятся исключения элементов,— началом 
очереди. Вы знакомы, например, с очередью людей у кассы в ма- 
газине самообслуживания или очередью автомобилей у бензо- 
заправочной станции. Вновь прибывшие становятся в один край 
очереди и покидают ее после оплаты покупок или заправки с дру- 
ГОО. 

_ Так же как стек, очередь может быть представлена с помощью 
массива. Нужны два указателя — на начало и на конец очереди. 
На рис. 5.4 показана очередь, растущая вправо; начало у нее 
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слева, а конец справа. Изображено выполнение четырех операций 
с очередью. | | 


В Р 
(а) Включить 14 (6) Включить 18 


Рис. 5.5. Циклическое представление очереди. 
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Рис. 5.6. Операции с очередью. (Текст р инстр. 21:('ОЧЕРЕЛЬ: УКАЗАТЕЛЬ 
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Продолжение Рис. 5.6. 


При реализации стека в виде массива его низ был фиксиро- 
ван, а вершина могла изменять свое положение. В очереди же 
могут двигаться как начало, так и конец, поэтому активная часть 
очереди постоянно перемещается вдоль массива. Если добавить 
еще один элемент в очередь на рис. 5.4, г, то он займет последнюю 
ячейку массива, и очередь окажется вроде бы заполненной. 
Имеются, однако, две свободные позиции в левом конце массива. 
Эти позиции можно использовать, если рассматривать массив как 
циклическую структуру, соединив два его конца. Позицией, 
правой по отношению к крайней правой позиции массива, будет 
крайняя левая позиция массива. Две вставки в такой массив 
изображены на рис. 5.5. 

Так же как и для стека, возможны ситуации переполнения 
и нехватки; их необходимо выявлять в программах, работающих 
с очередями. На рис. 5.6 дана программа с входными точками для 
инициализации, вставок и удалений из очередей, имеющих струк- 
туру, как на рис. 5.4 и 5.5. Указатель начала очереди указывает 
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всегда на самый старый элемент в очереди; указатель конца оче- 
реди всегда указывает на одну позицию правее самого нового 
элемента. Такое на первый взгляд неестественное представление 
указателя конца очереди оказывается удобным, когда требуется 
отличить пустой список (К =Е) от полного (В =Е— 1). При дан- 
ной интерпретации указателя конца очереди в массиве размера 
п, используемом для представления очереди, может храниться 
лишь (п—1) элементов. 

В дополнение к стандартному набору операций с очередью 
наша подпрограмма содержит еще одну входную точку 
(ОЧЕРМР), полезную для отладки. Одно из самых неприятных 
занятий, связанных с отладкой программы,— тратить время на 
получение разумных отладочных выдач. Потратив же несколько 
минут на написание этих нескольких инструкций в момент на- 
писания программ, вы можете ускорить процесс отладки. 

Мы снова воспользовались для представления динамической 
структуры данных массивом фиксированного размера. Хотя та- 
кой метод представления и прост, но с ним, как мы увидим в сле- 
дующем разделе, связана проблема использования памяти. 


5.4. Последовательное распределение памяти 
с указателями 


В связи с последовательными распределениями памяти воз- 
никает несколько проблем. Одна из них связана с последова- 
тельными списками общего типа, не являющимися стеками или 
очередями. Предположим, что список отсортирован в возрастаю- 
щем порядке, а затем понадобилось исключить несколько эле- 
ментов из середины списка. После каждого исключения нужно 
упаковывать список, т. е. подвигать все следующие за исключен- 
ным элементы на одну позицию вверх. Это необходимо для под- 
держания последовательной структуры списка. В некоторых 
процессах, например в алгоритме бинарного поиска из гл. 1, 
предполагается, что элементы списка расположены подряд, без 
пропусков или пустых позиций между двумя соседними элемен- 
тами. Но перемещение данных, вызванное упаковкой списка, 
может отнять слишком много времени, если список длинный, 
а исключаемый элемент находится близко к началу. 

Кроме того, узел списка может содержать много полей. Не- 
трудно представить список таких элементов в виде ряда парал- 
лельных массивов, где каждый массив содержит определенное 
поле всех записей; ]-я запись представляется ]-ми элементами во 
всех массивах. Если мы сортируем записи такого списка по не- 
которому полю и метод сортировки требует взаимных перестано- 
вок элементов, то всякий раз, когда необходимо поменять места- 
ми записи, приходится переставлять элементы во всех массивах. 
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Такой процесс перемещения данных сразу во всех массивах мо- 
жет оказаться слишком медленным. 

Эту проблему можно разрешить при помощи дополнительного 
массива МЕХТ, который освободит нас от ограничений, связан- 
ных с последовательными списками. Не обязательно физически 
размещать элементы в памяти подряд, можно располагать их в 


ОАТА 


| 


Исходный массив После сортировки 
(а) - (6) 


Рис. 5.7. Сортировка с использованием массива МЕХТ. 


произвольных позициях, но для [-го элемента поле МЕХТ (1) 
будет содержать индекс элемента [--1. Одна простая переменная 
НЕАО будет содержать индекс первого элемента списка. Поле 
МЕХТ (НЕА) будет указывать на второй элемент, индекс треть- 
его элемента содержится в поле МЕХТ (МЕХТ(НЕАО)) ит. д. 
При сортировке списков такого типа меняются местами лишь 
элементы массива МЕХТ и отпадает необходимость перемещать 
большое количество данных. Этот метод проиллюстрирован на 
рис. 5.7. 

Обратите внимание, что данные массива РАТА в процессе 
сортировки не перемещались. А это значит, что, будь у нас хоть 
десять массивов с данными, их элементы также не перемещались 
бы во время сортировки. Сортировка с использованием массива 
МЕХТ ненамного сложнее обычной. В подпрограмме на рис. 5.8 
проиллюстрировано развитие этих идей. Предполагается, что в 
массиве размером М№МК«МС каждый из МС столбцов содержит од- 
нородные данные. Данные в столбцах сортируются так, чтобы 
обеспечивался возрастающий порядок в столбце ЗОКТС. 

В подпрограмме применяется метод пузырька, поэтому время 
сортировки будет порядка МК *+2. Используя массив МЕХТ, мы 
вынуждены двигаться по списку только последовательно; поэто- 
му нельзя воспользоваться лучшим алгоритмом поиска, так как 
для этого требуется уметь просматривать список в другом поряд- 
ке, а не только последовательно сверху вниз. В упражнениях, 
однако, рассматривается метод с применением массива указате- 
лей, который позволяет воспользоваться более эффективными ал- 
горитмами сортировки. 
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Рис. 5.8. Сортировка на том же месте. 


5.5. Связанное распределение 


Добавив поле МЕХТ, мы получаем дополнительное преиму- 
щество — один и тот же блок памяти можно использовать для 
элементов разных списков. Вспомните пример с учетом товаров. 
Там для каждого вида товаров требовался стек или очередь; если 
в магазине продается 10 000 видов изделий, то нужно 10 000 сте- 
ков или очередей. Предположим, что один из товаров поступил 
в магазин по 50 различным заказам, в то время как в среднем 
каждый товар поступает в магазин по 2—3 заказам. Если невоз- 
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можно заранее предсказать, в какой очереди будет 50 элементов, 
а в какой — всего несколько, то под каждую из 10 000 очередей 
нужно будет отвести место на 50 элементов, т. е. 500 000 ячеек. 
Из этих 500 000 ячеек, однако, в среднем 470 000 использоваться 
не будут. Естественно, такой ситуации хотелось бы избежать. 

Добавим к каждой записи одно поле; это дополнительное поле 
будет использоваться так же, как МЕХТ в предыдущем разделе. 
Назовем его полем 11МК и будем хранить в нем адрес следую- 
щего элемента списка. Такой список называется связанным 
списком, и говорят, что каждый узел связан со следующим или 


ГОЛОВА 2. 


6 8 3 
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(<) Логическая структура, 


(6) Физическое расположение данных 
Рис. 5.9. Представление связанных списков. 


указывает на следующий узел. С логической точки зрения наша 
структура данных отличается от своего физического представле- 
ния. Логическая структура и ее физическое представление изоб- 
ражены на рис. 5.9. 

В связанном списке на рис. 5.9, б имеются незаполненные 
позиции, но они не являются частью связанного списка, изобра- 
женного на рис. 5.9, а; связанный список состоит всего из четы- 
рех элементов. Пустые ячейки можно было бы отвести под эле- 
менты другого списка. Связанное распределение позволяет фор- 
мировать два или более списков в одной и той же общей области 
памяти. 

На рис. 5.9, б, например, из элементов 1, 4, Би 7 можно было 
бы составить другой список. Для нового списка понадобился бы 
указатель на начало, скажем НЕАО2. НЕАО?2 указывал бы на 
первый элемент второго списка; пусть это будет элемент 4. Ука- 
затель [.[МК (4) ссылался бы на второй элемент, допустим эле- 
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мент 7; в ММК(7) хранилась бы ссылка на третий элемент, 
скажем элемент 1; наконец, в ЫМК (1) была бы ссылка на по- 
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Рис. 5.10. Операции со связанным стеком. (Текст в инстр. 11: (1Х, ' ВЗЯТЬ 
СО СТЕКА: УЗЕЛ НОМЕР’, 15, 'ДАННЫЕ' 16, ', НОВАЯ ВЕРШИНЛ,, 
15); 12: (1Х, "ПОЛОЖИТЬ НА СТЕК: ЭЛЕМЕНТ’, 16, СТАРАЯ ВЕРШИНА; 
15, ', НОВАЯ ВЕРШИНА,, 1[5)) 
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следний элемент второго списка, элемент 5. Таким образом, два 
или более списков могут располагаться в общей области памяти. 

Вспомним теперь наши подсчеты, согласно которым под стеки, 
содержащие в сумме 30 000 элементов, Понадобилось бы 500 000 
ячеек. Применив описанный выше метод, можно сократить тре- 
буемый объем памяти до 30 000 позиций на 30 000 элементов. На 
рис. 5.10 приведена программа для выполнения включений и 
исключений из связанного стека. 

Эта подпрограмма очень похожа на подпрограмму для работы 
с обычным стеком из разд. 5.2. Тут нет ничего удивительного, 
поскольку выполняются по существу те же самые действия, а 
изменилась только структура данных. Поскольку стек является 
наиболее простой для реализации динамической структурой дан- 
ных, то он часто используется для хранения свободных узлов па- 
мяти, которые можно присоединить к любому списку. Такой спи- 
сок свободных узлов часто называют списком свободного прост- 
ранства или ГАУЗ (1$ о9{ ауаЙае зрасе). 

В разд. 5.3 для решения задачи о моделировании нотока Това- 
ров в магазине мы ввели очереди, или списки типа ЕЕО. Для 
представления связанного стека нужен указатель на голову 


КОНЦЫ _ 
ОЧЕРЕДЕЙ 


ДАННЫЕ ССЫЛКИ 


НАЧАЛА 
ОЧЕРЕДЕЙ 


$ 


Рис. 5.11. Масёивы начал и концов списков. 


списка и один или более узлов данных, каждый из которых со- 
держит поле связи. Аналогичным образом представляются свя- 
занные очереди: для каждой очереди нужен один указатель 
начала, один указатель конца и один или более узлов данных со 
связями. Пусть в магазине продается 10 000 видов товаров, тогда 
потребуется 10 000 указателей начала очередей и 10 000 указате- 
лей их концов; указатели можно представить в виде ДВух масси- 
вов. Каждый из этих массивов является списком, и каждый эле- 
мент этих списков указывает на другой список. Маесивы такого 
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вида образуют список списков, пример которого изображен на 
рис. 5.11. 

В этом примере первый список состоит из двух элементов, 
ячейки 4 и 2; список 2 состоит из единственного элемента, ячей- 
ки 3; список 3 содержит три элемента, ячейки 5, 1 и 6. 

Работа со списком списков происходит, по существу, так же, 
как с одним списком. Программа для работы с очередями полу- 
чает в качестве параметров указатели начала и конна очереди, 
и ее не интересует, являются ли эти указатели простЫми перемен- 
ными или элементами массивов. На рис. 5.12 даны программы для 
работы с очередью, представленной в виде связанного списка. 
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Рис. 5.12. Операции со связанным стёком. 
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В заключение этого раздела мы покажем пример совместного 
использования программ для очереди и стека. Как указывалось 
выше, стек обычно применяют для хранения списка свободного 
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Рис. 5.13. Совместное использование очередей и стека. 


пространства. На рис. 5.13 дана программа, которая выполняет 
распределение памяти; она получает узел из списка свободного 
пространства, помещает в этот узел данные и подсоединяет его 
к очереди. 


5.6. Списки со многими связями 


5.6.1. Несколько упорядочений одного списка 


Во многих приложениях необходимо просматривать список бо- 
лее чем одним способом. Рассмотрим, например, систему для 
хранения записей о пациентах больницы. Каждая запись содер- 
жит такую информацию, как фамилия пациента, номер палаты, 
заболевание. В некоторых приложениях нужно, чтобы записи 
были упорядочены по фамилиям пациентов; в других случаях 
требуется доступ ко всем пациентам, которых лечит определен- 
ный врач. Можно было бы иметь один основной список записей 
обо всех пациентах в алфавитном порядке и отдельные списки, 
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в которых для каждого врача хранились бы записи обо всех его 
пациентах. Такое решение имеет два очевидных недостатка. Во- 
первых, неэффективно используется память, поскольку каждая 
запись имеется в двух экземплярах. Во-вторых, трудно поддер- 
живать согласованность всех списков: при всяком изменении за- 
писи из основного списка нужно аналогичным образом изменить 
запись в одном из врачебных списков. 


АГЕНО ФАМИЛИЯ АТРЕМК [ое ТИ |< Другие поля 
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Рис. 5.14. Список со многими связями для записей о пациентах. 


Для решения этой задачи удобно было бы иметь запись о каж- 
дом пациенте в одном экземпляре, но сделать ее частью двух 
независимых списков: основного и одного из врачебных списков. 
Возможный подход состоит в том, что строится последовательный 
список записей, упорядоченный по фамилиям пациентов. Каждая 
запись, кроме того, должна содержать поле для связи с другими 
больными, которых лечит тот же врач; для каждого врача нужно 
иметь указатель начала списка его пациентов. Несмотря на то что 
такая организация системы решает проблему экономии памяти и 
согласованности информации в списках, она все же не может нас 
удовлетворить, поскольку включения и исключения из упорядо- 
ченного последовательного списка связаны с перемещением боль- 
шого объема данных. 

Очевидно, что хорошего решения этой задачи нельзя добить- 
ся, если имеется только одно поле связи. Имея же два поля 
связей, можно сделать запись элементом двух независимых свя- 
занных списков. На рис. 5.14 показано такое решение. Здесь де- 
вять пациентов и три врача. Все пациенты при помощи поля 
связи АЕЕЁСМК и указателя АГЕНО связаны в список в алфавит- 
ном порядке. (Фамилии упорядочены по английскому алфавиту: 
АЧатз, ОСоаНпе, Ниовез, КосН, МасКкеу, МазВеу, О’Капе, 
РПеесег, Козе.) 

Переменная АГЕНО указывает на Адамса; за Адамсом 
идет Голдфин, что указано в поле АГЕГМК для Адамса; за Голд- 
фином идет Хьюз и т. д. Имеется также три указателя на врачеб- 
ные списки, РОСНО (1), РОСНО (2) и РОСНО (3). При помощи 
поля связи РОСЁМК связаны в списки все пациенты, лечащиеся 


244 | Гл. 5. Структуры данных 


«ера и поте = 


у одного и того же врача. Так, Голдфина, Маккея и Роуза лечит 
врач |1; Адамса, Мэши, О’Кейна и Ифлигера лечит врач 2, а Хьюз 
и Кох лечатся у врача 3. 

В предложенном решении в каждой записи имеется два поля 
связи, но мы вовсе не обязаны ограничиваться именно двумя 
ссылками; можно добавить их столько, сколько необходимо. 
В системе для хранения записей о пациентах можно, например, 
было иметь списки всех пациентов одного пола или списки для 
каждого типа заболеваний. Нужно учитывать, однако, ито е рос- 
том числа связей усложняется работа со списками. Если, ска- 
жем, в нашем примере Пфлигер выписывается, то его нужно ис- 
ключить не только из основного, но и из соответствующего вра- 
чебного списка. Пусть запись для Ифлигера была найдена после- 
довательным просмотром основного списка (указатель на его на- 
чало находится в АГРНО), тогда предыдущая и следующая запи- 
си известны, но только для основного списка. Следующую запись 
в нужном врачебном списке нетрудно найти при помощи поля 
РОСЕМК. Задача состоит в нахождении предшественника Пфли- 
гера во врачебном списке. В рассматриваемой структуре для это- 
го необходимо просмотреть все врачебные списки. 


5.6.2. Списки с двумя связями 


Как отмечено выше, наше решение задачи о списке пациентов 
не удовлетворительно, если записи часто исключаются. Для того 
чтобы упростить операцию исключения, введем понятие списка 
с двумя связями — списка, в котором каждый элемент содержит 
указатели как на следующий, так и на предшествующий элемен- 
ты. На рис. 5.15 эта идея иллюстрируется применительно к пре- 
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Рис. 5.15. Врачебный список с двумя связями. 


дыдущему примеру: в запись добавлено поле РОСРЮО, указы- 
вающее на предыдущую запись во врачебном списке. Новое ре- 
шение упрощает операцию исключения, но оно требует дополни- 
тельного поля в каждой записи. 
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В рассматриваемой структуре, найдя удаляемую запись в ос- 
новном списке, можно определить ее точное положение в соответ- 
ствующем врачебном списке. Следовательно, можно исключить 
ее, не просматривая записей в других врачебных списках. В об- 
щем случае М-я запись исключается при помощи инструкции 

РОСЕМК. (РОСРВРО (М))=РОСРЕО (М) 

Задача усложняется тем, что иногда приходится удалять голов- 
ной элемент врачебного списка. Примером тому является исклю- 
чение записи для Хьюза, где РОСРКРО (1) =0. Поскольку она 
первая во врачебном списке, то головной записью врачебного 
списка 3 должна стать следующая за ней запись. Это достигается 
при помощи инструкции РОСНО (3) =РОСЁМК (1. 


5.7. Деревья 


Списки со многими связями можно использовать также для 
представления структур, иерархических по своей природе. 
В примере с больницей, например, группы больных находятся 
на попечении своих лечащих врачей. Предположим, что каждая 


Главный хирург 


Врач | Врач Вроч Врач 


Дл Л. 


Четыре стажера. Четыре стажера Четыре стажера Четыре стажера 


Пациенты Паиценты Пациенты _ Пациенты 
Рис. 5.16. Древовидная структура. 


группа из четырех стажеров (всего, скажем, 20 стажеров) под- 
чинена врачу и все врачи подчинены главному хирургу больни- 
цы. Такую структуру, называемую деревом, можно изобразить 
примерно так, как на рис. 5.16. 

Структура данных дерево состоит из элементов, называемых 
узлами. Узлы соединены друг с другом направленными дугами. 
Если из узла х исходит дуга, ведущая в узел у: 

Хх 


и 


У 
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то узел х называется предшественником у, а у — преемником х. 
Каждое дерево имеет единственный узел, называемый корнем, 
у которого нет предшественников; любой другой узел имеет ров- 
но одного предшественника. Все узлы, в том числе и корень, име- 
ют ноль или более преемников. Узел, не имеющий преемников, 
называется листом. Каждый узел дерева находится на некото- 
ром ировме. Корень расположен на уровне 0. Все непосредствен- 
ные преемники узла, лежащего на уровне |, принадлежат уровню 
-Е1. | 

В дереве на рис. 5.16 корнем является узел, соответствую- 
щий главному хирургу. Он является предшественником для че- 
тырех узлов — врачей, каждый из которых имеет четырех пре- 
емников — узлы, соответствующие стажерам. Узлы-стажеры име- 
ют в качестве своих преемников узлы-пациенты. Листьями этого 
дерева являются узлы, соответствующие пациентам. Все листья 
находятся на уровне 3, стажеры — на уровне 2, врачи — на 
уровне |, а главный хирург — на уровне 0. 


5.7.1. Бинарные деревья 


Дерево называется п-арным деревом, если каждый его узел име- 
ет не более п преемников. Особый интерес представляют бинар- 
ные деревья. Бинарным называется 2-арное дерево, преемники 
которого различаются: один из них является левым преемником, 
а другой — правым преемником. Таким образом, узел бинарного 
дерева может либо вообще не иметь преемников, либо иметь толь- 
ко левого преемника, либо только правого, либо иметь и левого 
и правого преемников. 

Левым (правым) поддеревом узла в бинарном дереве называет- 
ся максимальное поддерево, имеющее в качестве своего корня 
левого (правого) преемника этого узла. Бинарное дерево поиска — 
это бинарное дерево, для каждого узла которого все значения 
данных в Левом поддереве меньше, чем значения в узле, а все 
значения в правом поддереве больше, чем значения в узле. При- 
мер такого дерева изображен на рис. 5.17. 

Бинарное дерево из и узлов называется сбалансированным, 
если разность между уровнями любых двух листьев не превышает 
1. Дерево на рис. 5.17 несбалансированное (уровень (2)—уро- 
вень (К)=2>1). На рис. 5.18 представлены все возможные 
сбалансированные деревья поиска, содержащие те же самые зна- 
чения данных. 

Использование бинарных деревьев поиска для реализации 
таблиц поиска приводит к дополнительному расходу памяти для 
логических связей (левых и правых) между узлами. Преимуще- 
ства, даваемые деревьями в этом случае, — простота операций 
включения и исключения. (Необходимо менять только ссылки.) 
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Рис. 5.17. Бинарное дерево поиска. 
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Рис. 5.18. Сбалансированные бинарные деревья. 
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Рис. 5.19. Представление бинарного дерева в Фортране. 
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В Фортране бинарное дерево может быть представлено двумя 
последовательными списками для левых и правых ссылок и од- 
ним или более списком для представления данных в узле. Напри- 
мер, дерево на рис. 5.17 могло бы храниться, как показано на 
рис. 5.19 (обратите внимание, что позиции 2 и 6 свободны и могут 
быть использованы для последующих включений в дерево). 

Представив бинарное дерево поиска, как на рис. 5.19, мы мог- 
ли бы задаться вопросом: имеется ли в каком-нибудь узле нашего 
дерева значение У? Следующий алгоритм служит для решения 
этой задачи. 


1. М = ЮООТ. 
2. Если М№=0, то перейти к 6. 
3. Если ОАТА (№) =У, то перейти к 8. 
4. Если РАТА (М№)>У, то М < МАМК (М), 
иначе М < КЕ МК (№). 
5. Перейти к 2. 
6. Сообщить, что элемента У нет в таблице. 
7. Стоп. | 
8. Сообщить, что элемент У содержитёея в позиции М. 
9. Стоп. 


Этот алгоритм реализован в программе для работы с таблицами 
символов в следующем разделе. 


5.7.2. Пример использования бинарного дерева 
поиска — работа с таблицей символов 


В гл. 0 отмечалось, что имена переменных, встретившиеся в 
программе на Фо тране, запоминаются в таблице символов. Каж- 
дый элемент такой таблицы содержит по крайней мере три поля: 


ИМЯ переменной адрес | тип 


Поле адреса необходимо для того, чтобы поставить в соответст- 
вие имени переменной одно или несколько слов памяти. Поле 
типа нужно, чтобы для каждой инструкции, содержащей эту пере- 
менную, сгенерировать правильные машинные команды. (Напри- 
мер, при компиляции инструкции А=В--С требуется проверить 
типы переменных В и С, чтобы выяснить, применять ли здесь 
команды целой или вещественной арифметики.) 

Для поддержания таблицы символов и работы с ней в компи- 
ляторе имеется подпрограмма поиска по таблице. При входе в 
подпрограмму ей в качестве параметра передается символ, кото- 
рый нужно найти. Если символ есть в таблице, то подпрограмма 
возвращает указатель на узел, содержащий этот символ. Если 
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найти символ не удалось, то в таблице символов создается новый 
элемент для этой переменной. Подпрограмма возвращает указа- 
тель на вновь созданный узел и признак того, что он новый. 

Поскольку обращения к таблице символов происходят часто, 
то ее структура и ‘алгоритмы работы с ней должны быть тщатель- 
но продуманы. Часто используется описанный в гл. 2 метод хе- 
ширования. Другой распространенный подход состоит в том, 
чтобы хранить элементы таблицы как узел бинарного дерева 
поиска. На рис. 5.20 представлена подпрограмма ТКЕТАВ, 
иллюстрирующая этот способ. 

Дерево, создаваемое при помощи программы ТВЕТАВ, не 
обязательно сбалансированное. Если символы включаются в таб- 
лицу в алфавитном порядке, то получится дерево, как на рис. 
5.21, а; поиск по такому дереву происходит не быстрее, чем 


ЗОВКОЧТ!МЕ ТВЕТАВ (УАВМАМ, МЕХ, Р) 


= ыыы ыьыЬы-ыЬа-ь---- - -ъ 
р ъ-- == = = = = 


ыы --ыыыЬыымы-ыЁмыыЫыыы-ыЁёЬ-ь- > 
жж --=ез- ыы -з-е-------- - 


= ПОДПРОГРАММА ДЛЯ ПОИСКА ИМЕНИ УАКМАМ В ДЕРЕВЕ, НА КОРЕНЬ 
С= КОТОРОГО УКАЗЫВАЕТ КООТ: ЕСЛИ ИМЯ НЕ НАЙДЕНО, ТО СОЗДАЕТСЯ 
С= НОВЫЙ ЭЛЕМЕНТ. В ДЕРЕВЕ МОЖЕТ БЫТЬ ДО 100 ЭЛЕМЕНТОВ. 
С= ПАМЯТЬ РАСПРЕДЕЛЯЕТСЯ ПОСЛЕДОВАТЕЛЬНО, Т. Е. ИСКЛЮЧАТЬ 
С= ИЗ ТАБЛИЦЫ НЕЛЬЗЯ (ЕКЕЕВ НАЧАЛЕ ДОЛЖНО БЫТЬ 1). ПРИ ПЕРЕ- 
С= ПОЛНЕНИИ ТАБЛИЦЫ ПЕЧАТАЕТСЯ СООБЩЕНИЕ И ВЫПОЛНЕНИЕ 
С= ПРОГРАММЫ ПРЕКРАЩАЕТСЯ. 


С = *х#* ПЕРЕМЕННЫЕ В СОММОМ-БЛОКЕ ++* 
‘С= ВЮООТ — УКАЗАТЕЛЬ НА КОРНЕВОЙ УЗЕЛ ДЕРЕВА; 
= ГЕЕТ — СПИСОК УКАЗАТЕЛЕЙ НА ЛЕВЫХ ПРЕЕМНИКОВ; 
С= В!ОНТ — СПИСОК УКАЗАТЕЛЕЙ НА ПРАВЫХ ПРЕЕМНИКОВ; 
= МАМЕ — ИМЯ ПЕРЕМЕННОЙ, ХРАНИМОЙ В ДАННОМ УЗЛЕ; 
С= МОБОЕ — ТИП ПЕРЕМЕННОЙ 
= [ГОС — АДРЕС ПЕРЕМЕННОЙ: 
С= ЕЮЕЕ — УКАЗАТЕЛЬ НА ПЕРВЫЙ СВОБОДНЫЙ ЭЛЕМЕНТ; 
С= МОРЕ, — ЗНАЧЕНИЕ ПУСТОГО УКАЗАТЕЛЯ; 
<= ОПТ — НОМЕР КАНАЛА ДЛЯ ПЕЧАТИ. 


С= *х** ФОРМАЛЬНЫЕ ПАРАМЕТРЫ зж* 


ИНН ииинииии 


С= УАРМАМ — ИМЯ, КОТОРОЕ НУЖНО НАЙТИ; 
С= МЕЖ — УСТАНАВЛИВАЕТСЯ РАВНЫМ ТВОЕ. ‚, ЕСЛИ ИМЯ РАНЕЕ 

— НЕ ЗАНОСИЛОСЬ В ТАБЛИЦУ, И ‚ЕАТЗЕ. В ПРОТИВНОМ 
с= СЛУЧАЕ; 
СЕР — УКАЗАТЕЛЬ НА ЭЛЕМЕНТ, В КОТОРОМ НАХОДИТСЯ = 
с= ПРОГРАММИСТ: — — — ДАТА: — — — = 


УНТЕСЕВ 1ЕЕТ(100), 100(100}., МООЕ (100), ВТСНТ(100} 

ТНТЕСЕВ Р., КООТ, РКЕЕ. РТВ. ОИТ, М 

СНАКАСТЕР +6 МАМЕ (100), УАЙВМАМ 

т ОСТСАЕ МЕН . 
СОММОМ АООТ» ТЕЕТ, АТОНТ, МАМЕ» №О0ОЕ, 106. `ЕВЕЕ, МЫ.» СОТ 


з.« ТАБЛИЦА ПУСТА? ое 
ТЕ ‘(АООТ „Е. МИЦ Са Та 89 
РТВ = ВОТ 


Рис. 5.20. Таблица символов, имеющая структуру дерева. (Текст в инстр. 1000: 
(5Х, °** ПЕРЕПОЛНЕНИЕ В ТКВЕТАВ ++')) 
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С ®.з СРАВНИТЬ. ЭЛЕМЕНТ С-УАВЧАМ. в. 
10 ТЕ (МАМЕ(РТА) „ЕО. УААМАМ) С0 ТО 40 
{Е (МАМЕ(РТВ) „ЕТ. \УААМАМ) 60 ТО 50 
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РТВ = ТЕЕТ (РТВ) 
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с о.» ДОБАВИТЬ УЗЕЛ СЛЕВА че 
30 СЕЕТ (РТА) = РАЕЕ 
60 Та 79 
С \ 
С оо ЭЛЕМЕНТ НАИДЕНова 
40 Р = РТВ 
МЕН = „ЕАССЕ. 
ВЕТИВН 
с , , 
с ... ПРАВЫЙ ПРЕЕМНИК „в 
50 ТЕ (АТСНТ(РТА! „ЕД. МИ) 60 ТО 60 
РТВ = ВАТСНТ (РТВ) 
60 ТО 10 | 
| ... ДОБАВИТЬ УЗЕЛ СПРАВА. се 
60 ВТСНТ (РТВ) = РАЕЕ 
| 
с ..., ПРОВЕРКА НА ПЕРЕПОЛНЕНИЕ ТАБЛИЦЫ. „о 


70 ТЕ (РАЕЕ „КЕ. 100) 60 ТО 99 
ИВТТЕ (00Т,1000) 

1000 РОАМАТ (5Х, '** ОУЕАРЕОМ 1М ТАЕТАВ +%' } 
УТОР 


с ... ПОМЕСТИТЬ НОВЫЙ УЗЕЛ В ПОЗИЦИЮ Р.ьье 
80 ВООТ = ЕВЕЕ 

99 Р = РАЕЕ _ 

| МАМЕ(Р) х УАРМАМ 

\ЕЕРТ(Р) = МИ 

АТСНТ(Р) = МЕС 

:КЕЕ = РАЕЕЁЕ + \, 

МЕН = ® ТВОЕ 

КЕТИАМ 

ЕМО 


Продолжение Рис. 5.20. 


последовательный поиск в упорядоченной таблице. Если же сим- 
волы включаются в порядке О, В, ЕЁ, А, С, Е, О, то получается 
дерево, изображенное на рис. 5.21, 6; поиск по такому дереву 
осуществляется с той же скоростью, что и бинарный поиск в упо- 
рядоченной таблице. Поведение бинарного дерева поиска зави- 
сит от того, сбалансированное оно или нет. Для поиска по сбалан- 
сированному дереву из и узлов достаточно просмотреть не более 
105.(п)-{-1 узлов. Если же дерево сильно несбалансировано, то 
при поиске может потребоваться проверка всех п узлов. Сущест- 
вуют алгоритмы, сохраняющие сбалансированность бинарного 
дерева поиска при включениях и исключениях, но их рассмот- 
рение не входит в круг вопросов данной книги. 
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Рис. 5.21. Деревья поиска; несбалансированное и сбалансированное. 


5.8. Пример работы со списками — моделирование 
автозаправочной станции 


5.8.1. О моделировании 


Моделирование — это имитация всех или некоторых аспектов 
поведения одной системы при помощи другой, не похожей сис- 
темы. Моделирование осуществляется часто с целью глубже по- 
нять систему или выяснить, как возможные изменения могут по- 
влиять на ее поведение. К моделированию прибегают в тех слу- 
чаях, когда прямой эксперимент либо невозможен (новая, еще не 
существующая система), либо неэкономичен (слишком дорого 
обойдется создание реальной системы), либо «аморален» (круше- 
ние самолета с пилотом при посадке), либо слишком продолжи- 
телен (эксперименты с лесным массивом и другими экологиче- 
скими системами). 

В большинстве случаев при моделировании можно предполо- 
жить, что время изменяется дискретными шагами от одного собы- 
тия до другого. Взяв за основу события в системе, мы часто полу- 
чаем возможность промоделировать продолжительные реальные 
отрезки времени за очень малое время. Например, основные со- 
бытия, происходящие за 10-часовой рабочий день на автозапра- 
вочной станции, можно смоделировать за несколько секунд. 


5.8.2. Моделируемая система 


Мы проиллюстрируем использование моделирования на при- 
мере имитации работы автозаправочной станции. Цель модели- 
рования — дать возможность владельцу предсказывать прибыль 
и, возможно, изменять организацию работы на станции с целью 
увеличения прибыли. 
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На моделируемой станции имеется один бокс для технического 
обслуживания автомобилей и две колонки. К каждому из этих 
трех объектов имеется отдельный подъезд для автомобилей, и на 
каждом из них работает один человек, который производит соот- 
ветствующее обслуживание клиентов. Обе колонки работают 
с 8 часов утра до 6 вечера, механик в боксе работает с 9 утра до 
6 вечера. 

Каждый час начиная с 9 часов утра на станцию прибывает 
один автомобиль, требующий технического обслуживания. Авто- 
мобили, требующие заправки, прибывают каждые три минуты 
в часы пик (с 8 до 9 утра и с 4 до 6 вечера) и каждые 6 минут 
в остальные часы (с 9 утра до 4 дня). Водитель автомобиля, 
прибывшего для заправки, выбирает ту из двух очередей к бензо- 
колонкам, в которой в данный момент меньше автомобилей. Пос- 
ле каждого прибытия автомобиля на заправку можно вычислить 
время следующего прибытия. Интервал от одного прибытия до 
другого вычисляется по формуле 


интервал=—ти*1о5 (г), 


где г принимает случайные значения, равномерно распределен- 
ные между О и 1, ати — среднее время между прибытиями (3 или 
6 минут). Такой метод генерирования интервалов называется ме- 
тодом © отрицательным показателем распределения интервалов. 
Он обладает тем свойством, что малые значения интервалов встре- 
чаются чаще, чем большие. (Примерно 63% всех прибытий про- 
исходит с интервалом меньше ти, менее 5% интервалов превы- 
шают значение З+ти.) 

Перечислим еще некоторые свойства моделируемой системы: 


_1. На станции может одновременно находиться не более 25 ав- 
томобилей. Так, если общее число автомобилей в очередях плюс 
число обслуживаемых автомобилей превышает 25, то водители 
вновь прибывающих автомобилей предпочитают проехать до сле- 
дующей станции. 


2. Для заправки автомобиля требуется от 0 до 20 галлонов !) 
бензина порциями по 5 галлонов (Т. е. автомобиль может полу- 
чить 0, 5, 10, 15 или 20 галлонов). Цена бензина — 75 центов за 
галлон. Автомобиль может получить также 0 или | кварту ?) 
масла по цене 85 центов за кварту. Еще два вида услуг — мытье 
ветрового стекла и подкачка шин — производятся бесплатно. 


3. В ремонтном боксе на автомобиль можно установить от 0 
до 4 шин по цене 34 доллара за штуку; замена масла стоит 7 дол- 


1) | галлон=3,78 л 
2) | кварта=1,14 л. 
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ларов 50 центов, смазка — 3 доллара 50 центов; общая регули- 
ровка автомобиля стоит 37 долларов 95 центов. 


4. При обслуживании автомобиля на бензоколонке затрачи- 
вается по 2 минуты на заливание каждых 5 галлонов бензина, 
3 минуты на добавление кварты масла, 2 минуты на мытье вет- 
‚ рового стекла и |1 минута на подкачку шин. 


5. При обслуживании в ремонтном боксе затрачивается 9 ми- 
нут на установку одной шины, 20 минут на замену шины, [0 ми- 
нут на смазку, 30 минут на регулировку автомобиля. 


6. Прибыль исчисляется в размере 20% общей выручки. 


5.8.3. Планирование и обработка событий 


При моделировании работы станции возможны шесть типов 
событий, которые необходимо пЛанировать и обрабатывать: 


|. Отбытие автомобиля с линии обслуживания 1 (первая бен- 
зоколонка). 

Отбытие автомобиля с линии обслуживания 2 (вторая бен- 
зоколонка). 

Отбытие автомобиля с линии обслуживания 3 (ремонтный 
бокс). 

Прибытие автомобиля на заправку. 

Прибытие автомобиля, требующего технического обслужи- 
вания. 

Запрос о текущем состоянии станции обслуживания. 


> ль © в 


События типа 5 происходят ровно через час начиная с 9 утра. 
После каждого прибытия планируется следующее прибытие че- 
рез 1 час. 

События типа 4 планируются со средним интервалом 3 или 
6 минут в зависимости от времени дня. Прибытие первого автомо- 
биля на заправку планируется через один интервал для часов 
пик от начала работы станции (т. е. вскоре после 8 утра). 

События типа 1, 2 и 3 планируются в начале обслуживания 
автомобиля. Время отбытия зависит от общего времени, необхо- 
димого для выполнения всех требуемых услуг. 

События типа 6 не соответствуют никаким событиям в реаль- 
ной системе. Они помогут нам проанализировать, насколько эф- 
фективно работает станция. Первый отчет выдается в 8 утра, а 
последующие отчеты печатаются через каждый час до 6 часов ве- 
чера. 

Если два события должны произойти в один и тот же момент, 
то первым обрабатывается событие, номер типа которого меньше. 
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Рис. 5.22. Блок-схема моделирования автозаправочной станции. 


Так, отбытие автомобиля от колонки | обрабатывается в первую 
очередь, а печать отчета — в последнюю. 

Блок-схема программы для моделирования событий на стан- 
ции обслуживания изображена на рис. 5.22; сама программа при- 
ведена на рис. 5.23. В программе используется последовательный 
список ТЕ для представления моментов наступления событий 
каждого типа. Массив ТЕ состоит из шести элементов, где ТЕ (Г) — 
время наступления следующего события типа Г. В любой момент 
времени Т1МЕ для обработки выбирается событие типа [, если 
ТЕ (Г) содержит минимальное время, большее или равное ТМЕ. 
При [<3 после окончания обработки отбытия мы устанавливаем 
ТЕ (Г)=тТЕ(П—1. Таким образом, событие [ блокируется до тех 
пор, пока не будет вычислено время следующего отбытия с этой 
линии. При |=4 или 5 после обработки текущего прибытия 
элементу ТЕ(Г) присваивается время следующего прибытия. 
При 1=6 печатается отчет о состоянии системы и планируется 
выдача следующего отчета ровно через час. 

Выдача на печать от моделирующей программы изображена 
на рис. 5.24. Изображена лишь часть отчета. А именно приведена 
информация о деятельности системы до 9 утра, отчет о состоянии 
станции на 11 часов утра и полный отчет о работе после 5 час. 
45 мин. вечера. 
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..МОДЕЛИРОВАНИЕ АВТОЗАПРАВОЧНОЙ СТАНЦИИ. .. 


ЦЕЛЬ: В ПРОГРАММЕ МОДЕЛИРУЕТСЯ РАБОЧИЙ ДЕНЬ ЗАПРАВОЧНОЙ 
СТАНЦИИ. ПОКАЗАНО ИСПОЛЬЗОВАНИЕ МАССИВОВ ДЛЯ ПРЕДСТАВ- 
ЛЕНИЯ СТЕКОВ И ОЧЕРЕДЕЙ. ДЛЯ ГЕНЕРАЦИИ НЕПРЕДСКАЗУЕ- 
МЫХ МОМЕНТОВ ПРИБЫТИЯ И ЗАКАЗОВ НА ОБСЛУЖИВАНИЕ ПРИ- 
МЕНЕН ГЕНЕРАТОР СЛУЧАЙНЫХ ЧИСЕЛ. 

ОСНОВНЫЕ ПЕРЕМЕННЫЕ 


[.АМЕ — ГОЛОВЫ СВЯЗАННЫХ СПИСКОВ МАШИН, ЖДУЩИХ ОБ- 
СЛУЖИВАНИЯ; 

ТЕ — МОМЕНТЫ ОВытИЯ (ЛИНИИ 1—3), ПРИБЫТИЯ (БЕНЗИН, 
РЕМОНТ) И ОТЧЕТ 

СЕТТ$ — МАССИВ ПИСАТЕЛЕЙ ДЛЯ 25 МАШИН; 

[МК — МАССИВ. ССЫЛОК В 'СЕЁГ5'. ЭКВИВАЛЕНТЕН СТОЛБЦУ 

’ Г.Г.$5”: 

АУА!|1, — ГОЛОВА СПИСКА СВОБОДНЫХ ПОЗИЦИЙ В ’СЕ! 15°; 

Т1МЕ — ТЕКУЩЕЕ ВРЕМЯ В МОДЕЛИ СИСТЕМЫ; 
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РЕГЕТЕ — ИСКЛЮЧИТЬ ЭЛЕМЕНТ ИЗ НАЧАЛА НЕКОТОРОЙ ОЧЕРЕДИ; 
|М5ЕВКТ — ВКЛЮЧИТЬ ЭЛЕМЕНТ В КОНЕЦ НЕКОТОРОЙ ОЧЕРЕДИ; 
КАМО — ФУНКЦИЯ ДЛЯ ПОЛУЧЕНИЯ СЛУЧАЙНОГО ЧИСЛА; 


ЗЕЮКУЕЮ — ВЫЧИСЛИТЬ ВРЕМЯ, НУЖНОЕ ДЛЯ ОБСЛУЖИВАНИЯ; 

РЕМАМ$— ОПРЕДЕЛИТЬ УСЛУГИ, НЕОБХОДИМЫЕ ДЛЯ ОЧЕРЕДНОГО 
К ЕНТА; 

Е1]МАМ$ — ВЫЧИСЛИТЬ СТОИМОСТЬ ЗАКАЗАННЫХ УСЛУГ И СУММУ; 

АВК УЕ — ВЫЧИСЛЕНИЕ МОМЕНТА СЛЕДУЮЩЕГО ПРИБЫТИЯ; 

ЗНОВТ — ВЫДАЕТ НОМЕР БОЛЕЕ КОРОТКОИ ОЧЕРЕДИ НА 
ЗАПРАВКУ; 

ОПТРОИТ — ПЕЧАТАЕТ ОТЧЕТ О ТЕКУЩЕМ СОСТОЯНИИ 

ПРОГРАММИСТ: — — — ДА —— 
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Рис. 5.23. Программа моделирования. 

(В главной программе 100: (’1’, 15Х, '++ МОДЕЛИРОВАНИЕ СТАНЦИИ 
ОБСЛУЖИВАНИЯ ж*°)); 

101: (5Х, ’ОТБЫТИЕ ИЗ ОЧЕРЕДИ, 12, "МАШИНА НОМЕР’, 13,’ СЧЕТ 

' Еб. 2, 'ВРЕМЯ’, 15}; 

102: (5Х, ’ ПРИБЫТИЕ В ОЧЕРЕДЬ,, 12, "МАШИНА НОМЕР,, 13, 15Х, 
'ВРЕМЯ’,, 15). 

В процедуре АГ.ГОС 100: (5Х, ’ +» СТАНЦИЯ ПЕРЕПОЛНЕНА, КЛИЕНТ 
УЕХАЛ НЕОБСЛУЖЕННЫМ)). 

В подпрограмме МЕХТ 100: (5Х, ’*=-ОШИБКА: НЕТ СОБЫТИЯ — ОСТА. 
НОВ В ПОДПРОГРАММЕ МЕХТ +»'). 

В подпрограмме РЕГЕТЕ 100: (5Х, ’ +«ОШИБКА: ИСКЛЮЧЕНИЕ ИЗ 
ПУСТОЙ ОЧЕРЕДИ ++). 

В подпрограмме ЕИМАМ$ 101: ('0’, Т23, '’»ж ИТОГ ДНЯ** '); 102: (’ОБСЛУ- 
ЖЕНО,, 14, "КЛИЕНТОВ, СРЕДНИЙ СЧЕТ СОСТАВИЛ $’, Е62, '’ СУММА 
ПРИБЫЛИ= $’, Е 8.2/,14, КЛИЕНТА НЕ ОБСЛУЖЕНЫ)). 

В подпрограмме ООТРОТ 100: ('0’, 14Х, "СОСТОЯНИЕ ЗАПРАВОЧНОЙ 
СТАНЦИИ: ', 15, 'ЧАСОВ’); 
101: РОМР — КОЛОН КА, САКАСЕ — РЕМОНТ. 
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Продолжение Рис. 5.23. 
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АМАТЕ = &1$Т 

ЕТ$Т = РТК 

АЕТИУЮМ 

ЕМО 

$ИВАОИТТМЕ ТМ$УЕАВТ(К, Е1ТЗТ,ЕТМК) 
Са=ая==ЕЕТЕЕЕЕСЕТЕЕЕЕ Е = ЕЕЕЕЕЕЕЕ ТСС ВЕТЕ ЕСЕНИН и вк НЕЕЕЕЕ Сян 
С ВКЛЮЧИТЬ ЭЛЕМЕНТ В КОНЕЦ, ОЧЕРЕДИ = 
С Е 
ск - УКАЗАТЕЛЬ НА ЭЛЕМЕНТ, КОТОРЫЙ НУЖНО ВКЛЮЧИТЬ = 
С 115Т —- ГОЛОВА СПИСКА, В КОТОРЫЙ ВКЛЮЧАЕТСЯ ЭЛЕМЕНТ = 
с цмк - ПОЛЕ ССЫЛКИ В ЭЛЕМЕНТАХ СПИСКА * 
Ст=тЕЕЕЕЕВНЕЕНТЕЕ ЕЕ ТЕЕЕСЕЕЕЕЫЫТСЕЕЕЕСК ООВ СВЕ ЕЕ СНА Е НЕЕ ЯСЬЕ 3 


ТМТЕбЕА &1МК(25) ,ЕТЗТ,К, РТА, РЯТ 
ОАТА РАТ/б/ 
С 
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С . . . НАЙТИ КОНЕЦ ОЧЕРЕДИ, ‚о 
ТЕ(ЕТЗТ ж„ЕДб. 0) 60 ТО 30 
РТА = %1ЗТ 
10 ТЕСЕТМК(РТЯ, ‚ЕЦ, ©) 60 ТО 209 
РТА = Ц ЫК(РТИ) 
60 ТО 10 
[я  ‹ › ДОБАВИТЬ ЭЛЕМЕНТ 'К'В КОНЕЦ ОЧЕРЕДИ ‚, во 
20 ЕМКЕРТА) = К 
60 ТО .40 


. . » СОЗДАТЬ НОВЫЙ СПИСОК ИЗ ОДНОГО ЭЛЕМЕНТА . ‹› ‹ 
30 115Т = К 
40 ЕТМК(К = 0 

АЕТИЯН 

ЕМО 


оо 


АВА РИМСТТОМ ААМО(АМАХ, 
СатзкЕЗЕХЕОЕСТЕЕ Е ЕВЕ ЕВТЕЯТЗЕТЕВЕЗЕЕЕ Я Е ВЕБЕ В ЕЕ ВЕИ СО ВВЕТЕЕ ЕЯ 
С ВЫЧИСЛЕНИЕ СЛУЧ. ВЕЩ, ЧИСЛА В ДИАПАЗОНЕ ОТ 0 ДО „ВАМАХ“ (НЕ ВКЛЮЧИТЕЛЬНО). 
С ПРОГРАММА ПРИГОДНА ДЛЯ МАШИН С 32-РАЗРЯДНЫМ ДОПОЛНИТЕЛЬНЫМ КОДОМ, 

с В ЧАСТНОСТИ, ТВМ 360-370. 


СизЕЗЕТЕСНХЕНЕНЕТЕСКИЗЕЕСЕЗЕШ Е ШЕЗСОЕ ЕВ ЕЕ ВЕ ЗЕ ВОВ СЕ Виа ов ивы икс 


С 


АЕАЕ АМАХ 
ТМТЕСЕЯ ТААМО, МИАТ, КАВСЕ 
ОАТА 1ААМО/131462873/, МШАТ/65539/, КАВСЕ/2147483647/ 
С . . . ВЫЧИСЛИТЬ НОВОЕ СЛУЧ. ЦЕЛОЕ (ОТ1 ДО 2. ж* 31-1) 
1ВАМО = ТВАМО®МИЕТ 
ТЕ(ТААМО „(Т. 01 ТААМО = (ТААМОФЕАВСЕ) +1 
с . . › ВЫЧИСЛИТЬ ТРЕБУЕМОЕ ВЕЩЕСТВЕННОЕ ЧИСЛО 
КАМО = ВМАХ®ТКАМО .4656613Е-9 
ВЕТУВМ 
ЕМО | 


с ЗУВВОУТТНЕ ЗЕАМЕЯ (Т,ТТМЕ, СЕКА$ ,КАМЕ, ТЕ) 
зов осоон зо овоавоа воно остготов сот стеттист 
С ВЫЧИСЛИТЬ ОЖИДАЕМОЕ ВРЕМЯ ОБСЛУЖ. КЛИЕНТА ИЗ ОЧЕРЕДИ ГАМЕСТ), 

С ЧТОБЫ ОПРЕДЕЛИТЬ ВРЕМЯ ОТБЫТИЯ МАШИНЫ. ) 

С ВРЕМЯ ОБСЛУЖИВАНИЯ: 

С ЗАПРАВКА: 5 ГАЛЛОНОВ-2 МИН... МАСЛО -— ЗМИН., МЫТЬЕ-2 МИН. ‚ ПОДКАЧКА-1 МИН... 
С РЕМОНТ: ШИНА-9 МИН. , МАСЛО - 20 МИН.. СМАЗКА-10 МИН. ‚ РЕГУЛИРОВКА- 30 МИН. 


СГ —- НОМЕР ОЧЕРЕДИ-1 ИЛИ 2 ДЛЯ ЗАПРАВКИ, 3 ДЛЯ РЕМОНТА; 

С ТТМЕ - ТЕКУЩЕЕ ВРЕМЯ ; 

С СЕН. $- ЭЛЕМЕНТЫ, ОПИСЫВАЮЩИЕ ВИД И ОБЪЕМ УСЛУГ $ 

С КАМЕ - ГОЛОВЫ СЙИСКОВ-ОЧЕРЕДЕЙ 1. 2,3 

СТЕ __- ВРЕМЕНА СЛЕДУЮЩИХ СОБЫТИЙ КАЖДОГО тип. 

зо созасоолоттятасстостизасаоасоосяаттозосоосвитзтоз оао ес 

ТМТЕСЕЯ Т1МЕ, СЕ (25,6), АМЕ(З), $АУТТМ, ТЕ (6) НА, ТТ МЕ (4,2) от 
ОАТА Т1МЕЗИ2,3,2,1,9,20,10,30/ 


С. 
с . . . ЗАПРАВКА ИЛИ РЕМОНТ? 
94-1 
ТЕСТ .Е9. 3) 4-2 
( . . ‹ ВЫЧИСЛИТЬ ОБЩЕЕ ВРЕМЯ ОБСЛУЖИВАНИЯ... 
ЗАУТТМ = 0 
00 10 К=1,4 . 
ЗАУТТМ = ЗВУТТМ+ТТМЕ$ (К) СЕТ $ (ЕАМЕСТУ, К) 
с 10 СОМТТМОЕ 
6 . . . ВЫЧИСЛИТЬ ВРЕМЯ ОКОНЧАНИЯ ОБСЛУЖИВАНИЯ . . 


НА = 1Т1МЕ/100 

МТМ = ТТМЕ-НА 100+ $ ВУТ1 М 
НЯ = НА+М1М/60 

МТМ = М1М- (МТМ 601 +60 
ТЕ(Т) = НАФ100+М1М 
АЕТИАМ 

ЕМО 
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$УВВОЧТТМЕ ОЕМАМ$ (К, СЕК $) 


Стихии иискхикинтысти ис ао аатиоиииви носов сосок соков иовяции и = 


С ВЫЧИСЛЯЕТ УСЛУГИ ДЛЯ ОЧЕРЕДНОЙ МАШИНЫ 
С 


С ИСПОЛЬЗУЕТ ЩЕЛОЧИСЛ. СЛУЧАЙНУЮ ВЕЛИЧИНУ 

СС РАВНОМ. РАСПРЕД. И ЗНАЧЕНИЯМИ ; 

С ЗАПРАВКА ; 0-4 ПОРЦ, ПО 5 ГАЛ.5 МАСЛО, МЫТЬЕ, ПОДКАЧ. - ДА/НЕТУ 
с РЕМОТ: 0-4 ШИНЫ» СМ. МАСЛА? СМАЗ. у РЕГУЛИР.- ДА/НЕТ: 

с ЗНАЧЕНИЯМ ДА/НЕТ СООТВ. 1ИО. 


СК- ЭЛЕМЕНТ В СЕГЬ$, СООТВЕТСТВ. ДАННОИ МАШИНЕ › 
С СЕЕЕ$ - МАССИВ; УСЛУГИ ДЛЯ КАЖДОЙ МАШИНЫ . 
Са==хтсЕЕЕЕТЕТЕНЫХ ЕЕ Есина са ине Ениа а 

ТМТЕСЕВ СЕК$( 25,6) ,СААМИМ, К 

ВЕАК АММТ (4) 

ОАТА АММТИ 5. 2..2... 2. /, САВМНИМ/О/ 


С . . г ВЫЧИСЛИТЬ ОБЪЕМЫ УСЛУГ. ‹ з 
00 10 4=1,4 
СЕКЕ$(К,.) = ААМОСАММТЕ И) 
10 СОМТТМИЕ 
САВМИМ = САКМОМ+1 
СЕКК$(К,5) = СААМУМ 
ВЕТИАМ 
ЕМО 


$УВАОСУТТМЕ ЕТМАМ$ (САВ,Е,СЕКЕ$ ВТ) 

Совок сияхстаоссякистоя с сосания иски носят вони нотостовоевоео 

ВЫЧИСИ. СЧЕТОВ ДЛЯ ДЛЯ ОТБЫВ. МАШИН И ОБЩЕЙ ПРИБЫЛИ. 
ЕСЛИ САВ Б. ИЛИ Р. О, НУЖНО ВЫЧИСЛИТЬ СЧЕТ ДЛЯ ДАННОЙ МАШИНЫ. ыы 
В СООТВЕТСТВИИ С ЦЕНАМИ: э 
ЗАПРАВКА: 5 ГАЛ.- 3.75, 1КВАРТА МАСЛА-0.85, - 
РЕМОНТ. 1ШИНА- 34, СМ. МАСЛА-7.50, СМАЗКА-3.5, РЕГУЛ .- 37.95 = 
Е=1 ИЕ=2 СООТВЕТСТВУЮТ ЗАПРАВКЕ, [=3- РЕМОНТ. ыы 
СТОИМОСТЬ УСЛУГ ЗАНОСИТСЯ В "Вт. , " 
ЕСЛИ САВ БОЛЬШЕ 0, ТО ЭТО НОМЕР ЭЛЕМЕНТА, СООТВ. ДАННОЙ МАШИНЕ = 
В СЕ $. - 
ЕСЛИ САВ НЕ БОЛЬШЕ 0, ТО ЭТО ВЗЯТОЕ СО ЗНАКОМ МИНУС ЧИСЛО МАШИН, ыы 
С УЕХАВШИХ БЕЗ ОБСЛУЖИВАНИЯ. - 
Г: 


Сэз= знании тока свиток ттосстаоакаазацноа ааа 


ооорооосоосо 


1МТЕСЕВ СЕ $ (25,6) ,М$АМО, САВ,РВТ 

КЕАЕ ВТЕЕ,РАОР1Т ‚, СО$Т (4,2), АМЕ 

ОАТА М$ВУО/ЛОЛ, РЕОЕ1ТТ/О. /,СОЗТ/ИЗ. 75,.85 0..0... 34. 

А У , . . + О, ›Оеу 7» 573, 5:37», 95/ 
С ь о о СЧЕТ ИЛИ ОБЩАЯ СУММА ПРИБЫЛИ? . ..о 

ТЕССАВ „1 Е. 0} С0 ТО 30 


С 
С ‚ › › ЗА КАКОЙ ВИД УСЛУГ НУЖЕН СЧЕТ? ... 
4.1 
р ТЕК „ЕД. 3) д.2 
с . ‹ . ВЫЧИСЛЕНИЕ СЧЕТА ДЛЯ ДАННОЙ МАШИНЫ . о о 
10 ВЦЕ = 0 ; 
00 20 1=1,4 
ВТЕЕ = ВТА ФСЕ $ ( САВ,ТУ®СО$Т (1,44) 
20 СОМТТМИЕ 
РАОЕР1Т = РАОЕТТ+ 2 ВЕ 
М$АУО = М№$5АМО+1 
АЕТИАМ 
С 
С . . › ПЕЧАТЬ ОБЩЕЙ СУММЫ ПРИБЫЛИ. .ь 
30 АУЕ = РВАОЕР1Т%5. /М$ЗЕАУО 
МАТТЕ (РАТ, 101) 
101 РОВМАТ ('О’,Т23, '%®*ЕМО ОЕ ОАУ АССОИМТ1МС+е * } 
САВ = САР 


МАТТЕ (РАТ 102) М$ВМО,АМЕ, РАОЕ[Т , САР 
102 РОВМАТ (* ЗЕВУЕО',Т4,* САВ$ МНО РАТО $',26.2,' ОМ ТНЕ АМЕВАСЕ. 9, 
Хх —' ТОТАЁ РАОРТ = $%,28.2,/,14,' САВ$ ТУАМЕО АМА.) 
ВЕТИЮМ 
ЕМО 


Продолжение Рис. 5.23. 
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р ТИТЕСЕВ РИМСТТОМ АВАТУЕ (ТТМЕ, ЕУЕМТ) 
ВЫЧИСЛИТЬ ВРЕМЯ ПРИБЫТИЯ СЛЕДУЮЩЕЙ МАШИНЫ ® 

ЕУЕМТ= 4 ОЗНАЧАЕТ ЗАПРАВКУ и РАСПРЕДЕЛЕНИЕ ЭКСПОНЕНЦИАЛЬНОЕ 
С0 СРЕДНИМ ЗНАЧЕНИЕМ 3 МИН. ДЛЯ ЧАСОВ ПИК 

С 8 ДО 9 ИС4 ДО 6. В ОСТАЛЬНОЕ ВРЕМЯ СРЕДН. ИНТЕРВАЛ 
МЕЖДУ ПРИБЫТИЯМИ - 6 МИН. (С 9 ДО 4). 

ЕУЕМТ=5 ОЗНАЧАЕТ РЕМОНТ, СЛЕДУЮЩЕЕ ПРИБЫТИЕ 
ПЛАНИРУЕТСЯ ЧЕРЕЗ ЧАС . 


пнининиинчиы 


ТТМЕ - ТЕКУЩЕЕ ВРЕМЯ . 
ЕУЕМТ-ТИП СОБЫТИЯ. 
ЕРЕЕЕЕЕНЕТЕЕЯЯЫЕЯ ЕЕ ЕВЕ весенних. отв ` 
ТМТЕСЕВ ЕМЕМТ,ТТМЕ, МИ( 2), МОМРЕК( 2) „САР, НА,М1М 
ОАТА МИ/З,6/,МОМРЕК /900,1600/ 


эоосоаооосоосоо 


‚ „ › ПРИБЫТИЕ НА ЗАПРАВКУ ИЛИ РЕМОНТ? .... 
ТЕ(ЕУЕМТ „ЕО. 5) 60 ТО 10 


ос аЖа. 


. о о ЗАПРАВКА. ЧАС ПИК ИЛИ НЕТ? 
4=1 | 

ТЕССТТМЕ „СЕ. МОМРЕК( 1); .„АМО. (Т1МЕ „АТ. МОМРЕК(21)) 4 = 2 
САР = -МИ( 4% АТОС (ВАНО (1-9) 


‚ . о ВЫЧИСА. ВРЕМЯ СЛЕДУЮЩ . ПРИБЫТИЯ ‚ ‹ .› 
НА = Т1МЕ/100 

МТМ = ТУМЕ-НА$100+САР 

НВ = НАФМТМ/бО 

МТМ = МИ-(М1М/60) 60 

АКАТУЕ = НА*100+ММ 

КЕТИВМ 


С ‚ › » ПРИБЫТИЕ НА РЕМОНТ РОВНО ЧЕРЕЗ ЧАС ‚ ь о 
10 НЕ = Т1МЕ/1О0 
АВАТУЕ = (Н+1)*100 
ВЕТИЙМ 
ЕМО 


ада. 


-  Т№ТЕСЕЯ РОМСТТОМ ЗНОАТЕСТМК,САМЕ) 


ВЫЧИСЛИТЬ НОМЕР БОЛЕЕ КОРОТКОЙ ОЧЕРЕДИ. = 
МК - ПОЛЕ ССЫЛКИ В ЭЛЕМЕНТАХ ОЧЕРЕДИ + = 
"АМЕ - УКАЗАТЕЛИ НА НАЧАЛА ОЧЕРЕДЕИ. = 
ЕЕ Е ЕЕЕЕНТЕНЕСЕСТЕС ЕЕ Е ЕТЕЕЕЕЕЕ СЗУ ЕЕЖЕЕЕ НЕХ ЕК ЧЯЕТЯСЕВЕСКИЯ 

ТМТЕСЕЯ &1МК(25) ,КАМЕ(З), ЕАМЕ1\, ГАМЕ2 

‚ ‹ . ПРЕДПОЛОЖИМ, ЧТО ОЧЕРЕДЬ 1 КОРОЧЕ › о» 

$НОАТ = 1 

САМЕ1 = АМЕ(Т) 

ТАМЕ2 = ТАМЕ(2) 


ь « » ДВИГАТЬСЯ ПО ОЧЕРЕДЯМ, ПОКА ОДНА ИЗ НИХ НЕ КОНЧИТСЯ ‹ ое 
10 ТЕСЦАМЕТ „ЕО. 0} ВЕТИАМ - 

ТЕ(КАМЕ2 „ЕО. 0) 60 ТО 20 

\АМЕТ = С1МК(САМЕТ 

САМЕ? = ИТМКЕГАМЕ2 } 

60 ТО 10 
С ‚ « » ОКАЗАЛОСЬ, ЧТО ОЧЕРЕДЬ 2 КОРОЧЕ ‚ ь о 
20 ЗНОВТ = 2 

ВЕТИВМ 

ЕМО 


$ОВРОИТ1МЕ ОИТРИТ(ЕТТМЕ, ГАМЕ, СЕСЕ$ ,ЕТМК) 


ОатУЕТЕЕЕЕЕТЕСЕЕЕЕЕТЕНЕТЕСЕЕТЕХЕТЕХЕЗЯХЕСКЕ ЗЕВЕУВУНЕЧОТКОТЕТЕТНЕЕЗНЕЕУЯ 


о ообобооз 


с с 


С — ТЕКУЩЕЕ СОСТОЯНИЕ ЗАПРАВОЧНОЙ СТАНЦИИ. = 
С = 
С ‘ИМЕ - ТЕКУЩЕЕ ВРЕМЯ > , ы 
@ — КАМЕ - УКАЗАТЕЛИ НА НАЧАЛА ОЧЕРЕДЕЙ > * 
С СЕ $ - ПО СТРОКЕ НА МАШИНУ, СТОЛБ. 5- НОМЕР МАШИНЫ > 
С ММК — ПОЛЕ ССЫМКИ В ОЧЕРЕДЯХ. = 


СехтезахаосиизаизкизицициКцзсхяыиаоааищаяааавниноцкизяасиха аз ааиаавиаизаааак 


Продолжение Рис. 5.23. 
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ТМТЕСЕЯ ТТМЕ,АСАТМ, САМЕСЗ) ,САВ (3), СЕКЬ$ (25, 6); 1МК( 25) „МИМ( ЗУ, РАТ 
СОСТСАЕ МОВЕ 
ОАТА РАТ/б/ 


С 
С ‚ ‚ о ПЕЧАТЬ ЗАГОЛОВКА ОТЧЕТА, +. 
МАТТЕ(РАТ ‚,100) ТТМЕ 
100 РОАМАТ('0'’,14Х, '5ЕВ УТСЕ ЗТАТТОМ $ТАТИ$ СНЕСК:',15,' НОУА$!) 
УВТТЕ (РАТ,1О1 ) 
101 РОКМАТ(15Х, }Тооооооо о 9 10х, Теоооовово у 10х, *"ооозроноей / 
1 15Х, ': РОМРТ :', 10Х, *';: РИУМР2 :+, 10Х, ':САВАСЕ :' / 
г 15Х, оооовоооо у 10х, "Тоооооооье "У 10х, Тоооохороо? / | 
С ни 
с . ‚. » ПЕЧАТАТЬ СОДЕРЖИМОЕ ВСЕХ ОЧЕРЕДЕИ . о › 
00 10 1=1,3 
САК(Т} = БАМЕСГ) 
10 СОМТТМИЕ 
С 


с “... НОМЕР МАШИНЫ ИЛИ 0) ЕСЛИ ОЧЕРЕДЬ КОНЧИЛАСЬ ‚ ‹ ® 
20 МОАЕ = „РАБЗЕ. 
00 490 1=1,3 
ММЕТ) = 0 
ТЕ ( САВ(Г) „ЕС. 0) С0 ТО 40 
М№ММ(Т) = СЕА$ (САВ(Т), 5) 
САВ(Т) = ТМК (САА(ТЬ р 
МОВЕ = „ТВИЕ, 
40 СОМТТМУЕ 
`ЫЕТТЕ (РАТ, 102) (МУМ(Т),Г=1,3} 
102 ЕОВМАТ (18Х,3(13,16Х)) 
с . . . ЕСЛИ НЕ ВСЕ ОЧЕРЕДИ КОНЧИЛИСЬ, ТО НОВАЯ СТРОКА . ь ‹ 
ТЕ (МОВЕ) СО ТО 20 
МАТТЕ (РАТ ›„103] 
103 ЕРОВМАТ ('0'} 
АЕТОАМ 
ЕМО 


Продолжение Рис. 5.23. 


состояние заправочной станции: 800 часов 


: колонка | ; : колонка 2; : ремонт : 
прибытие в очередь | машина номер | время 804 
прибытие в очередь 2 машина номер 2 время 809 
прибытие в очередь | машина номер 3 время 810 
отбытие из очереди 2 машина номер 2 счет $ 3.75 время 813 
отбытие из очередч | машина номер 1 счет $12.10 время 815 
прибытие в очередь 2 машина номер 4 время 822 
прибытие в очередь | машина номер 65 время 826 
отбытие из очереди | машина номер 3 счет $15.85 время 828 
отбытие из очереди 2 машина номер 4 счет $11.25 время 829 
прибытие в очередь 2 машина номер 6 время 834 
прибытие в очередь | машина номер 7 время 836 
прибытие в очередь 2 машина номер 8 время 836 
отбытие из очереди | машина номер 5 счет $15.85 время 840 
отбытие из очереди 2 машина номер б6 счет 8 4.60 время 840 
отбытие из очереди 2 машина момер 8 счет $ 0.85 время 844 
прибытие в очередь 2 машина номер 9 время 845 
прибытие в очередь | машина номер 10 время 847 
прибытие в очередь 2 машина номер 11 время 847 
прибытие в очередь | машина номер 12 время 848 
прибытие в очередь 2 машина номер 13 время 848 


отбытие из очереди | машина номер 7 счет 811.25 время 849 


Рис. 5.24. Распечатка программы моделирования. 
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отбытие из очереди 2 машина номер 9 счет $ 7.50 время 849 
отбытие из очереди | машина номер 10 счет $ 4.60 время 855 
отбытие из очереди 2 машина номер 11 счет $ 0.85 время 855 
отбытие из очереди 2 машина номер 13 счет $ 0.00 время 858 
прибытие в очередь 2 машина номер 14 время 858 
отбытие из очереди | машина номер 12 счет $ 3.75 время 900 
отбытие из очереди 2 машина вомер 14 счет $ 0.00 время 900 
прибытие в очередь 3 машина номер 15 время 900 


состояние заправочной станции: 900 ч 


колонка |: колонка 2 : ремонт : 
0 0 15 
0 0 0 
состояние заправочной станции; 1100 ч 
‚ колонка! : : колонка? : ; ремонт ; 
Е а" од” "° 
34 0 35 
0 0 0 


отбытие из очереди 3 машина номер 143 счет $109.50 время 1747 
отбытие из очереди 2 машина номер 140 счет $ 7.50 время 1749 
отбытие из очереди | машина номер 133 счет $ 8.35 время 1750 


прибытие в очередь 2 машина номер 160 время 1750 
прибытие в очередь | машина номер 161 время 1753 
прибытие в очередь 2 машина номер 162 время 1755 
прибытие в очередь | машина номер 163 время 1755 


** станция переполнена: клиент уехал необслуженным 

отбытие из очереди 2 машина номер 142 счет $ 15.00 время 1758 

отбытие из очереди | машина номер 135 счет $ 8.35 время 1800 

прибытие в очередь 3 машина номер 164 время 1800 

отбытие из очереди 3 машина номер 164 счет $ 0.00 время 1800 
состояние заправочной станции: [800 часов 


‚ колонка |: ‚ колонка 2: : ремонт : 
136 144 0 
139 146 0 
141 148 0 
145 149 0 
147 151 0 
150. 153 0 
152 154 0 
155 156 0 
157 159 0 
158 160 0 
161 162 0 
163 0 0 

0 0 0 


** ИТОГ ДНЯ ** 
обслужено 141 клиентов, средний счет 14.47. сумма прибыли =$ 407.99. 
4 клиента не были обслужены. 


Продолжение Рис. 5.24. 
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Упражнения 


5.01. Предположим, имеется два циклических связанных списка с указателями 
РТ и Р2, как изображено на рисунке. 


Пусть Р1=0 означает, что первый список пуст, а Р2=0 означает, что 
второй список пуст. Узлы обоих списков состоят из элементов двух целочис- 
ленных векторов РАТА и [МК. Например, АТА (Р!) — первый элемент 
первого списка, РАТА (11МК(Р!)) — второй элемент и т. д. 

(а) Составьте программу на Фортране, которая подсоединяет второй список 
в конец первого (конкатенирует их) и делает второй список пустым. 

(6) Покажите, как при помощи таких циклических связанных списков можно 
реализовать операции включения и исключения из очереди. Предполагается, 
что есть список (стек) свободного пространства с указателем АУАП.. Так, 
ОАТА (АУАП.) — первый свободный элемент, РАТА (1.1МК(АУАП.)) — вто- 
рой ит. д. Значение АУАП.=0 говорит о том, что свободного пространства 
нет. 


5.02. В языке Фортран требуется, чтобы циклы были правильно вложены друг 
в друга и чтобы конец цикла находился ниже соответствующей инструкции 
ОО. Напишите препроцессор, который бы проверял соблюдение этих условий 
в программе или подпрограмме на Фортране. (Указание. Встретив инструкцию 
ОО, положить на стек метку конца цикла; встретив помеченную инструкцию, 
взять со стека верхний элемент, если он совпадает с меткой.) 


5.03. Многочлен от одной переменной х можно представить в машине`как свя- 
занный список с узлами вида 


Коэффициент при х 
Степень х 
Ссылка 


Например, многочлен —3жх6--4+х3-|-6жх?--9 будет храниться в виде списка 


в котором узлы расположены в порядке убывания степеней х. Напишите 
подпрограмму ПМРОТ, которая читает значение п и затем п--! коэффициентов 
ап,..., а!, а0 некоторого многочлена степени п и строит его представление, 
как указано выше. Узлы с нулевыми коэффициентами включать не нужно. 
Напишите подпрограмму для сложения таких многочленов (нулевые слагае- 
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мые должны быть исключены из результирующего списка). Напишите под- 
программу ОЧТРОТ для печати многочлена. Для проверки своих подпрограмм 
составьте тест, в котором читаются два многочлена, затем складываются и ре- 
зультат печатается. 


5.04. Список с двумя связями вида 


может быть представлен указателем НЕАД и тремя списками К1@НТ, ГЕЕРТ 
и ОАТА. Имея такое представление, напишите подпрограммы на Фортране 
для выполнения следующих операций. 

(а) Вернуть указатель на узел со значением поля РАТА, равным ЕПМО. Если 
такой узел не найден, то вернуть признак того, что узел отсутствует. 

(6) Исключить элемент, значение поля ВАТА которого равно БЕГ. 

(в) Добавить узел, на который ссылается указатель РТ, в начало списка. 
(г) Выполнить операции включения и исключения из очереди. 

5.05. Программа сортировки на том же месте, описанная в этой главе, требует 
п? сравнений. Более эффективный способ организации данных для сортировки 
на том же месте состоит в том, чтобы использовать список МЕХТ для выборки 
элементов массива А. Так, если сортировка идет по столбцу СОГ., то полю 
МЕХТ(Г) присваивается значение ], если А(Л, СОГ.)) есть Л-й по величине 
элемент столбца СОГ.. Переменная НЕАР при таком методе не нужна. Пере- 
пишите программу ПМЗОКТ, используя алгоритм ОШСК$ФОВТ из гл. 1, ко- 
торая бы присваивала соответствующие значения элементам столбца МЕХТ. 


5.06. Подпрограмма ТКЕТАВ из этой главы показывает, как найти или доба- 
вить элемент в бинарном дереве. Напишите подпрограмму для исключения 
из бинарного дерева элемента со значением \. 


5.07. Вам поручено смоделировать генеалогическое дерево для некоторого 
лица. Предложите конструкцию такого дерева и постройте алгоритмы для 
нахождения отца, матери, тети, двоюродного и родного брата этого лица ит. д. 
Как должно быть устроено такое дерево? Как будет выглядеть его узел? 


Глава 6 


ПРЕДСТАВЛЕНИЕ ДАННЫХ В МАШИНЕ 


Данные всех типов (вещественные, целые, логические, литер- 
ные) представляются внутри ЭВМ в виде последовательности 
двоичных разрядов (цифр), называемых битами. На разных ма- 
шинах приняты разные соглашения о представлении данных. 
Однако наибольшее распространение получили несколько основ- 
ных способов кодирования. Вначале мы рассмотрим эти общие 
принципы, а затем особо остановимся на методах, принятых в ма- 
шинах серий ВМ 360-370 и РЕС-10. 


6.1. Двоичное представление целых чисел 


Двоичная система счисления обладает теми же свойствами, что 
и более известная десятичная система счисления. Обе они осно- 
ваны на позиционном принципе. Например, десятичное число 257 
представляет собой последовательность из трех цифр: 7 в позиции 
единиц, 5 в позиции десятков и 2 в позиции сотен. Это можно за- 


писать так: 
257=2*102-5*101--7*10° 


Вообще любое десятичное число может быть представлено в виде 
последовательности цифр 0, 1, 2, ..., 9 при основании 10. 
Позиция каждой цифры указывает степень, в которую нужно воз- 
вести 10, чтобы получить множитель при этой цифре. 


Ч,-: Ч. ... а 4 @, цифра в позиции 
10771 10"? ... 10? 10: 10° вес позиции 
Число = У»; 10:4, 

В двоичной системе счисления есть только две цифры 0 и |1. 
Основание системы 2. Позиция каждой цифры указывает, в ка- 
кую степень нужно возвести 2, чтобы получить множитель при 
этой цифре: 

р, 6,-. ... 6.6: 6 цифра в позиции 

20-1 21-2 .., 22 2129 вес позиции 

ча, 
Число= »',;2%, 
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Таким образом, двоичное число 1101101, например, равно деся- 
тичному числу 109, что можно увидеть из следующей записи: 


1101101 = 1#28- 1+25--0*24-- [+23- ]«22-- 0&21- [*2° 


Хотя в большинстве ЭВМ положительные целые числа представ- 
лены в Такой двоичной форме (называемой чисто двоичной), 
существуют отличия в способах представления отрицательных 
чисел. Обычно используются три формы для представления отри- 
цательных чисел: прямой, обратный и дополнительный коды. 
Рассмотрим каждый из этих кодов. Для простоты во всех приве- 
денных примерах операции выполняются с 10-разрядными двоич- 
ными числами. | 


6.1.1. Прямой код 


ЭВМ, в которой для представления двоичных чисел исполь- 
зуется прямой код, запоминает числа в чисто двоичном коде. 
В этом коде один бит числа отводится для представления знака. 
Например, десятичное число 14 в прямом коде будет записано 
так: 


0000001110 


Крайний левый двоичный разряд 0 указывает на знак плюс (-|-), 
остальная цепочка битов 000001110 представляет десятичное 
число 14. Десятичное число —17 хранится в машине как 


1000010001 


Здесь крайний левый бит | обозначает знак минус (—), а биты 
000010001 представляют десятичное число 17. 

Представление чисел в прямом коде удобно для интерпрета- 
ции человеком, но имеет два недостатка. Первый, у числа 0 нет 
однозначного представления, так как оба числа 0000000000 (--0) 
и 1000000000 (—0) представляют ноль. Второе и более важное об- 
стоятельство — возникают трудности при выполнении в прямом 
коде операций сложения и вычитания. Они вызваны тем, что при 
сложении чисел с разными знаками должны приниматься во вни- 
мание относительные величины чисел. Например, при сложении 
чисел 14 и 17 мы не можем просто сложить их двоичные представ- 
ления, поскольку в этом случае получили бы неверный резуль- 
тат: 

0000001110 -- 14 

1000010001 —17 

1000011111 —31 
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Поэтому, если знаки чисел различны, мы должны вычесть мень- 
шую величину из большей и затем приписать правильный знак: 


000010001 17 
—000001110 —(- 14) 


1000000011 —3 


Этот недостаток привел к тому, что в большинстве вычислитель- 
ных машин были приняты другие способы кодирования. 


6.1.2. Обратный код 


Представление отрицательных чисел в обратном коде приня- 
то на многих машинах, в том числе серий ОМТУАС 1100 и 
СОС 6000 и 7000. В обратном коде крайний левый бит также 
представляет знак, но в арифметической операции участвуют все 
двоичные разряды, включая бит знака. 

Десятичные числа {14 и —17 будут представлены в обратном 


коде как 
| 0000001110=-Е14 
1111101110=—17 


Число —17 вначале представляется как --17 (0000010001), а за- 
тем все | заменяются на 0, а О — на 1. Для представления числа 
—х в п-разрядном двоичном слове достаточно вычесть х из после- 
довательности, содержащей п единиц. Таким образом, обратный 
код числа х есть 2"—1—х. 

Теперь при выполнении операции сложения —17 и -{ 14 мы 
имеем 


0000001110 +14 


Июн 
100 3 


Однако правильный ответ не всегда так легко получается. Рас- 
смотрим, например, суммирование чисел 17 и —14 


0000010001 17 
11111190001 — 14 


0000000010 --2 


Результат оказался на единицу меньше истинного. Добавив еди- 
ницу переноса из крайнего левого разряда суммы, получим пра- 
вильный ответ: | 


0000010001 17 
--1111110001 —14 


0000000010 2 
] --1 (бит переноса) 


000000001 1 3 
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Вообще при сложении чисел в обратном коде вначале выпол- 
няется суммирование и затем, если возникает перенос из знако- 
вого разряда, добавляется единица к полученному результату. 
Таким образом, при работе с обратным кодом первое затруднение 
состоит в необходимости дополнительной операции сложения. 
Второе затруднение заключается в том, что число ноль не имеет 
единственного представления: оба представления 0000000000 (+0) 
и 1ИИИИ (—0) допустимы. Результат —0 получается при вы- 
читании отличного от нуля числа х из самого себя. Например, 


0000000101 5 
1111111010 —5 


1111111111 —0 


6.1.3. Дополнительный код 


Число —х в ИП-разрядном дополнительном двоичном коде 
представляется в виде 2”—х. Дополнительный код может быть 
получен из обратного кода числа х (2"—1—х) прибавлением 
1 к младшему разряду (2"—1—х--1=2”—х). Так, число —17 в 
дополнительном коде будет записано как | 


1111101111 =—17 


Процедура изменения знака — это основной недостаток до- 
полнительного кода. В отличие от обратного и прямого кода для 
изменения знака числа, представленного в дополнительном коде, 
требуется выполнить операцию сложения. Положительной сто- 
роной дополнительного кода является то, что число 0 имеет един- 
ственное представление. Вот как в дополнительном коде пред- 
ставляется число ноль: 


ПЕ (обратный код) 
-- | (прибавление 1) 


0000000000 (бит переноса игнорируется) 


Одно из наиболее важных достоинств дополнительного кода 
состоит в том, что при сложении не возникает особых случаев. 
В качестве примера проиллюстрируем сложение чисел -[14 
и — И: 

0000001110 14 

1111101111 —17 


1111111101 —3 


6.2. Двоичное представление вещественных чисел 


В десятичной системе счисления число 12.63 представляется 


в виде суммы 
12.63 = 1*#10-Н2*1--6*.1-Е3*.01 


6.2. Двоичное представление вещественных чисел 269 


Аналогично двоичное число 110.1| будет представлено как 
110. И =14- 1+2-0*1- 1+.5- 1+.25 


Такая интерпретация числа основана на том, что в позиционной 
системе счисления цифра, расположенная правее разделительной 
(или позиционной) ') точки, должна быть умножена на основание 
системы счисления в соответствующей отрицательной степени. 

Для представления вещественных чисел в ЭВМ нужно каким- 
то образом обозначить положение десятичной точки. В большин- 
стве случаев используется представление, называемое числом с 
плавающей точкой. Оно основано на так называемой научной 
нотации. Десятичное число 12.63, например, будет представлено 
в виде .1263+10?, а двоичное число 110.11 — как .1101]93. 

В обоих случаях число состоит из двух частей — мантиссы 
(или дробной части) и показателя. Дробная часть может быть 
нормализована. Нормализованная положительная мантисса — 
это мантисса, у которой первая после точки цифра отлична от 
нуля (цифра может быть нулем только в том случае, если вся 
мантисса равна нулю). Достоинством такой формы записи яв- 
ляется то, что любое число имеет единственное представление. 
Для ненормализованного же числа существует сколь угодно мно- 
го различных представлений (например, число 12.63 может быть 
записано как .01263*103, 126.3#10-1 ит. п.). 

Если для представления чисел используется описанный спо- 
соб, то они хранятся в памяти обычно в следующем виде: 


Знак | Порядок | Мантисса | 


Порядок представляет показатель степени. Так, двоичное число. 
100.1] в 10-разрядном двоичном слове будет записано в виде 


0 1011 10011 


Знак | Порядок --8 | Дробная часть 


В данном примере мы отвели четыре двоичных разряда под поря- 
док и пять разрядов под мантиссу. Порядок записан в форме 
«плюс восемь». Это означает, что указанное значение показателя 
на 8 больше истинного. Так, двоичный порядок 1000 соответству- 
ет нулевому показателю, О=8—8, 1011 — показателю 3=11—8, 
0011 — показателю —5=3—8 и т. д. 


1) В десятичной системе счисления ее называют еще и десятичной точ- 
кой.— Прим. ред. 
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Может показаться странным, почему мы используем форму 
«плюс восемь» вместо представления в прямом, сбратном или до- 
полнительном коде. На это есть две причины. Первая — легче 
производить сравнение абсолютных величин: порядок и мантиссу 
можно обрабатывать как одну последовательность битов. Вторая 
причина — упрощается сложение, так как вначале мы сравни- 
ваем показатели чисел, а затем сдвигаем вправо мантиссу с мень- 
шим показателем до тех пор, пока порядки чисел не совпадут. 
Так, при сложении чисел 110.11 (6. 75) 1 И _.01 (.25) выполняются 
следующие действия: 

1. Определение большего порядка: 


0:1011:1 1011 (6.75) 110128 
0:0111:10000 (0.25) .10000*2-1 


Разность = 4 
2. Выравнивание порядков и последующее сложение: 


ОО: Отт (6.75) .11011 #23 
+0:1011:00001 (0.25) .00001 +23 
0:10 ТГ ГГГГОО (7.00) 111100*+23 


Описанная методика не отличается от той, которую мы применя- 
ем при сложении десятичных чисел. Например, если бы мы скла- 
дывали числа .675*10' и .25+10°, то вначале выравнивали бы 
показатели путем замены числа .25*10° на .025+10:, а затем про- 
извели бы сложение мантисс. 

При сложении двух чисел результирующее значение мантиссы 
может получиться ненормализованным. В этом случае необходи- 
мо выполнить последующую нормализацию (постнормализацию). 
Следующие два примера иллюстрируют необходимость выполне- 
ния постнормализации. 


Случай Т. Мантисса результата слишком велика. 
1. Определение большего порядка: 
0:1011:1 1011 (6.75) .110П +23 
0:1001:11100 (1.75) .11100*2: 
Разность = 2 
2. Выравнивание порядков и сложение: 
0:1011:11011 (6.75) .11011 +23 
--0:1011:00111 (1.75) .001 #2 . 
0:1100:10001 (8.50) 1.00010 + 23 = .10001 + 2 
Вычисленное значение мантиссы равно 1.00010. Для нормализа- 


ции полученного результата прибавляем | к порядку, заменяя 
1011 на 1100, и делим мантиссу на два (сдвигая ее вправо на один 


разряд). 


6.3. Ошибки и потеря точности — целые числа 271 


Случай 2. Мантисса результата слишком мала. 
1. Определение большего порядка: 


011011 :11011 (6.75) (1101123 
1:1010 :11000 (—3.0) .11000*2 


Разность = | 


2. Выравнивание порядков и сложение: 


0:1011:11011 (6.75) . 11011 + 22 
+1:1011:01100 (—3.0) —.01100 +2 


0:1010:11110 (3.75) .0111] *23=.11110 +22 


Выше мы полагали, что отрицательные числа представляются в 
прямом коде. Затруднение в данном случае возникло, когда мы 
получили дробную часть .01111. Была выполнена нормализация 
за счет вычитания из порядка | и умножения мантиссы на 2 
(сдвигом на один разряд влево). 

Отрицательные вещественные числа могут быть представлены 
в прямом, обратном или дополнительном коде. Число ноль, од- 
нако, всегда представляется как правильный ноль (все биты нуле- 
вые). Такое представление гарантирует, что ноль имеет наимень- 
ший порядок. [оэтому, если ноль прибавляется к другому чис- 
лу, не должна происходить потеря битов в дробной части этого 
числа при переносе разделительной точки. 


6.3. Ошибки и потеря точности — целые числа 


Во всех рассмотренных нами примерах арифметики с целыми 
числами мы могли получить правильный результат. Однако в 
действительности может получиться неверный или неточный ре- 
зультат. Наиболее общим случаем неверного результата является 
переполнение: при сложении или умножении двух чисел результат 
не умещается в одно слово памяти машины. Например, при сло- 
жении чисел 7] и 445 в ЭВМ, где числа представлены 10-разряд- 
ным двоичным дополнительным кодом: 


° 0001000111 71 
--0110111101 445 
1000000100 —508 (ошибка переполнения) 


в результате ошибки переполнения получается неверный резуль- 
тат —508. Обычно ошибки такого типа ЭВМ обнаруживает, пре- 
кращает выполнение программы и выдает соответствующее сооб- 
щение об ошибке. К сожалению, не во всех машинах предусмот- 
рена регистрация таких ошибок. 

Второй наиболее общий случай возникновения ошибок — это 
деление на ноль. Практически все машины обнаруживают эту 
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ошибку, выполнение программы прекращается и выдается соот- 
ветствующее сообщение. 

Даже когда при делении целых чисел частное не равно 0, 
полученный результат часто бывает очень неточным. Рассмотрим, 
например, вычисление целых выражений 


НЕЛ КЕ 
1-Е ЛёЕ/К 


Математически они идентичны. При [=3, Д1=4, К=5 и Е=6б 
правильный результат равен 7.8, однако при вычислении первого 
выражения будет получен результат 3, а при вычислении второго 
7. Действительно, | 


1-ЕЛ/КаГ.=3- (4/5) +6 =3-Е0#6=3--0=3 
[--1«Г/К=3-+ (4+6) /5=3--24/5=3+4=7 


Как видно из данного примера, порядок вычислений имеет важ- 
нейшее значение. Обычно выполнение операции деления следует 
откладывать как можно дольше, чтобы избежать кумулятивного 
эффекта — накопления и распространения ошибок усечения. 


6.4. Сшибки и потеря точности — вещественные числа 


Наиболее типичные ошибки, связанные с арифметикой над 
вещественными числами, возникают в трех случаях: переполнение 
порядка (величина числа слишком велика), потеря корядка (ве- 
личина отличного от нуля числа слишком мала) и деление на ноль. 
Как и в случае возникновения ошибок в арифметике с целыми 
числами, большинство ЭВМ обнаруживает указанные ошибки 
в арифметике с вещественными числами, в результате чего вы- 
полнение программы прекращается и выдается сообщение об 
ошибке. | | 

К более серьезным ошибкам, которые машина не обнаружи- 
вает, относятся ошибки неточности вычислений. Неточность по- 
лученных результатов может возникать по разным причинам. 
Во-первых, вследствие того, что мантисса имеет конесную длину, 
некоторые числа невозможно точно представить. Так как дробь 
1/3, например, не может быть точно представлена в десятичной 
системе счисления, то десятичное число .3 не может быть точно 
представлено двоичной мантиссой конечной длины. Поэтому при 
выполнении присваивания 


Х=.3 
вносится небольшая ошибка в результаты, полученные програм- 
мой. 

Арифметические операции, такие, как сложение и умножение, 
вносят дополнительные ошибки из-за округлений или усечений, 
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необходимых при запоминании слишком большой дробной части 
в машинном слове, имеющем конечную длину. Алгоритмы, позво- 
ляющие сократить число арифметических операций, обычно сни- 
жают эффект накопления ошибки. 

Ошибки округления и усечения зависят также от порядка вы- 
полнения операций. Например, число 64 представлено в 10-раз- 
рядном двоичном коде как 


0:1111:10000 -64 .10000#2 
а число | — как 
0:1001:10000 -1 .10000#21 


Теперь, вычисляя (64—64)--1, мы получим результат 1. Однако 
если порядок вычисления будет иным, (64--1)—64, то мы полу- 
чим неверный результат 0. Чтобы убедиться в этом, покажем, 
что в результате сложения 64--| получается 64. 

1. Определяем болыпий порядок: 


0:1111:10000 -- 64 .10000+21 
0:1001:10000 1 .10000х 21 
Разность =6. 


2. Выравниваем порядок, сдвигая мантиссу: 


0:1111:10000 -- 64 .10000 +21 
-0:1111:000000 1 1 .000 0001 + 2* 
0:1111:10000 —- 64 .10000 *2: 


Проблема, которая возникает в данном случае, вызвана большой 
разницей в величинах складываемых чисел (слишком мал диапа- 
зон чисел, представимых в 10-разрядном двоичном слове). На 
практике длина слова обычно намного больше, поэтому число 64 
не будет казаться слишком большим по сравнению с 1. Однако 
в большинстве машин (в которых отводится не более 35 битов для 
представления мантиссы) вычисление выражения 


(2==35-2.=—35)—2*35 
дает ноль, тогда как вычисление 
(235—235) 2=—35 


приводит к правильному результату 2-35; 
Как можно избежать потери точности при вычислениях, по- 
казывает решение квадратного уравнения вида 


ах? ьх--с=0. 
Одно из решений этого уравнения 
(-[--У (6*— 4ас))/2а. 


10 № 2043 
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Если а=1, 6=10 и с=— 1, получим 


(—108--И (10% --4))/2. 

На вычислительных машинах, в которых арифметические 
операции выполняются с точностью менее 10 десятичных разря- 
дов (например, 1ВМ 360-370 и РЕС-10), 10'°--4 дает 100, И (10%) 
дает 10° и (—10°--10°)/2 даст в результате значение х, равное 
0. Это абсолютно неверно, так как 

1[#02-| 105+0—1=—1. 


В том случае, если 6? много больше 4ас, лучшее приближение 
получится при умножении 


(НБ-И (62-- 4ас))/2а 


на тождество 


([—6— У (6 — 49с))/(—5—У (62—46). 


Это дает эквивалентную формулу 


21(—6—У (6*— 4ас)). 


Хотя полученная формула алгебраически эквивалентна первона- 
чальной, при ее применении происходит вычисление 


2/(10$ --У (10% 4)). 
Полагая, что точность менее 10 цифр, получим х=107°. Хотя 
этот результат неточен, он намного лучше прежнего, в чем можно 
пегко убедиться: 


1*(1025)2-{ 105%+10=—1=1020. 


Более подробное обсуждение предмета точности вычислений 
выходит за рамки данной книги. Читатели, интересующиеся этой 
проблемой, могут найти подробную информацию в книгах по 
численным методам, применяемым в ЭВМ '). 


6.5. Двойная точность 


Число разрядов, определяющих точность вычислений, прово- 
димых над вещественными переменными, недостаточно для мно- 
гих применений. Поэтому Фортран обеспечивает тип данных, 
называемый «переменная с двойной точностью?. Переменные 
с двойной точностью декларируются посредством инструкции 
РОЦВЕЕ РЮЕСТЗ1ОМ: 


РОЧВЕЕ РВЕСЗОМ список переменных 


1) См., например, книгу Д. Кнута, Искусство программирования для 
ЭВМ. Т. 2.— М.: Мир, 1977, п.4.2.2. Там же читатель найдет материал, отно- 
сящийся к другим разделам этой главы.— Прим. ред. 
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Константа с двойной точностью будет записана точно так же, как 
и вещественная константа Е-типа, только вместо буквы Е следует 
написать букву 2. Например, 


2.62144000976525 Р-5 


представляет число 262144.000976525. Различные вычислитель- 
ные машины имеют различную точность представления данных 
вещественного типа и с двойной точностью, но всегда представ- 
ление с двойной точностью дает по крайней мере вдвое большую 
точность по сравнению с обычной арифметикой вещественных 
чисел. 

Переменные с двойной точностью обычно считываются и вы- 
водятся на печать в формате О. Спецификацию О записывают 
аналогично Е-формату с той разницей, что буква Е заменяется 
на О. Код формата 2 интерпретируется идентично Е. На самом 
деле эти коды могут быть использованы равнозначно. 

Общеприняты два способа хранения чисел двойной точности 
в памяти ЭВМ. В первом для запоминания используют два слова, 
каждое с порядком и мантиссой. Мантисса первого слова содержит 
старшие разряды дробной части, младшие разряды хранятся 
во втором слове. Представленное таким образом число опреде- 
ляется суммой двух слов. Так, если мантисса состоит из п цифр, 
порядок второго слова на п меньше порядка первого слова. 
Применительно к 10-битным словам можно представить деся- 
тичное число 8.875 (1000.111 в двоичной системе счисления) как 


0: 1100: 10001 О: 0111: 11000 


Отсюда видно, что первая часть представляет десятичное число 
8.5, а вторая .375; сумма этих чисел равна 8.875. 

Этот первый способ вносит некоторую избыточность, по- 
скольку порядок второй части может быть вычислен по порядку 
первого слова. Во втором способе представления в некоторых 
машинах используются все биты второго слова (или все биты, 
кроме знакового) для расширения мантиссы первого слова. 
В таких машинах число 8.875 может быть представлено как 


0: 1100 : 10001 11900000000 


или, если знаковый бит второго слова не использован, как 
0: 1100: 10001 0: 110000000 


6.6. Восьмеричные и шестнадцатеричные числа 


Во всех вышеприведенных примерах данной главы мы огра- 
ничились словами с 10 двоичными разрядами. Такое представ- 
ление чисел удобно для объяснений, но нереалистично в прак- 
тических применениях. Современные машины, такие, как ОЕС-10 


10* 
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и ВМ 360-370, имеют гораздо больший размер слова: 36 и 32 
двоичных разряда соответственно. Для более компактного пред- 
ставления слов такой длины обычно выражают содержимое слова 
РЕС-10 в восьмеричной системе счисления (с основанием 8), 

слова [ВМ 360-370 в шестнадцатеричной системе счисления 


(с основанием 16). 
В то время как десятичные числа представляются цепочкой 


цифр от 0 до 9, восьмеричные числа представляет цепочка цифр 
от 0. до 7. В десятичном числе 


Ч,-1 Чи»... 4 @: 4 
с позицией { (цифрой 4;) связан вес 10:. Аналогично восьмерич- 
ное число 
Он-1 Ола ... 05 01 0, 
имеет вес 87, соответствующий позиции #. Величина такого числа: 
Число = У; 870 
Так, в восьмеричное ч число 324 можно записать в виде 
382-281-480, 
что дает 192--16--4, или 212. Так как 8=23, каждая цифра в 
восьмеричной записи соответствует трем двоичным цифрам: 


Восьмеричные числа Двоичные числа 
000 
001 
010 
О 
100 
101 
110 
111 


Шестнадцатеричные «Двоичные "Десятичные 


—1 © бл фм -@© 


о 


0000 
оо0т, 
0010 
0011, 
0100 
0101. 
0119 
0111. 
21000 
1001, 
21010 то 
1011. 71. 
9100 12 
4101. 43 
7110. 14 
21111 ` 5 


оочаильнно 


нупироочалньоьн 
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Так, восьмеричное число 324 соответствует двоичному числу 
011010100. Запомнив приведенную выше таблицу, вы легко 
сможете преобразовывать числа из восьмеричной системы счис- 
ления в двоичную и обратно. 

В шестнадцатеричной системе счисления используются цифры 
от 0 до Эиот А до Е; основание системы 16. Учитывая, что 16=2+, 
можно установить соответствие между шестнадцатеричными 
цифрами и их двоичным и десятичным представлением — см. 
стр. 276. Используя эту таблицу, можно записать двоичное 
число 101001101111 как АбЕ в шестнадцатеричной системе 
счисления или, суммируя 


10*162--6*16*-- 15+16°, 


как 2671 в десятичной системе счисления. 


6.7. Представление чисел в ВМ 360-370 


В ВМ 360-370 целые и вещественные числа запоминаются в 
слове с 32 двоичными разрядами (восемь шестнадцатеричных 
цифр). Целые числа представлены в машине в дополнительном 
коде. Переполнение, если оно происходит, будет обнаружено 
в результате выполнения операций сложения или вычитания. 
Регистрируется также деление на ноль. К сожалению, если 
произведение двух целых чисел нельзя представить в 32 битах, 
ошибка не будет обнаружена. Поэтому ошибочное произведение 
останется незамеченным и может испортить все последующие 
вычисления. 

Вещественные числа в [ВМ 360-370 представлены в прямом 
коде и хранятся нормализованными в следующем формате: 


Знак Порядок | Мантисса 


0 1—7 8—31 


Порядок превышает на 64 истинный шестнадцатеричный (не 
двоичный) показатель. Так, десятичные числа 25.75 и —25.75 
хранятся в шестнадцатеричном виде как 


42 : 190000 25.75 
и 


С2 : 190000 —25.75 


Шестнадцатеричный порядок имеет свои достоинства и недо- 
статки. Положительной стороной является то, что, используя 
только семь битов, мы можем представить числа в диапазоне от 
16-5“ до 1653. Основной недостаток — нормализованная шест- 
надцатеричная дробная часть может оказаться ненормализо- 
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ванной, если ее рассматривать как двоичную. Например, дроб- 

ная часть числа 25.75 в двоичном представлении ВМ 360-370 

есть | 
.000110011100000000000000 


В среднем машины ВМ 360-370 обеспечивают точность лишь 
в пределах 22.5 двоичных разрядов, а не 24, как это может по- 
казаться. 

Числа с двойной точностью имеют длину 64 бита, в составе 
которых 32 дополнительных бита используются для расширения 
мантиссы. Эти числа записывают в форме 


Знак Порядок 


Мантисса | 


0 1—7 8 —63 


Так, например, десятичное число 262144.0009765625= 218-52-10 
хранится в шестнадцатеричной системе счисления как 


45 : 400000 04000000 


В среднем «двойная точность» означает 54.5 двоичных разрядов. 
В десятичной записи точность увеличивается с 7 до 16 десятич- 
ных цифр. Диапазон представимых чисел в обоих случаях со- 
ставляет примерно от 10-78 до 1075 (от 16-85 до 1683). 

‚ Из-за относительно невысокой точности в машинах ВМ 
360-370 возникает необходимость в разряде защиты. Это допол- 
нительная шестнадцатеричная цифра используется во всех опе- 
рациях над вещественными числами и над числами с двойной 
точностью. Проиллюстрируем ее роль в наглядной форме. 


Пример: Вычесть 41112217 из 4210778А. 
Чтобы выровнять порядки, преобразуем 41112217 в 420112217. 
Дополнительная цифра мантиссы (7) используется как разряд 
защиты: 


42:10778А 0 л =-<- разряд защиты 
—4 2:011221 7 = разряд защиты 
4 2:0 Е 6568 9 -<- разряд защиты 
4 1:Е 65689 Нормализация 


Польза разряда защиты становится очевидной при постнор- 
мализации. Если бы разряда защиты не было, результат имел 
бы меньшую точность: 


41:Е65690 


При выполнении арифметических операций над веществен- 
ными Числами и числами с двойной точностью машины ВМ 
360-370 обнаруживают ошибки переполнения и потери порядка, 
а также ошибки, возникающие при делении на ноль. 
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6.8. Организация памяти в машинах 18М 369-370 
6.8.1. Байяты, полуслова, слова и двойные слова 


‘Основная единица памяти в машинах [ВМ 360-370 имеет 
длину 8 бит и называется байтом. Каждый байт имеет свой 
адрес, с помощью которого к нему осуществляется доступ. 
Первый байт памяти имеет адрес ноль, второй — единица и т. д. 

Байты группируются для формирования более крупных 
ячеек памяти. Любая пара последовательных байтов, в которой 
первый байт имеет четный адрес, называется полусловом. Так, 
нулевой и первый байты вместе образуют полуслово. Аналогично 
полуслово образуют байты второй и третий, а байты первый 
и второй полуслово не образуют. 

Слово состоит из четырех последовательных байтов, где пер- 
вый байт имеет адрес, кратный 4. Двойное слово представлено 
восемью последовательными байтами, первый из которых имеет 
адрес, кратный 8. Следующая схема показывает связь полуслов 
(Н), слов (Е) и двойных слов (0) с первыми 16 байтами памяти 
5 . 


Адрес 00’ 01’ 02’ 03’ 04’ 05’ 06’ 07’ 08’ 09’ 10’ 11’ 12’ 13’ 14’ 15 


Машины серии 360 построены таким образом, что операции над 
целыми, вещественными и логическими переменными могут быть 
выполнены только в том случае, если под указанные переменные 
отведено полное слово. Переменные с двойной точностью должны 
располагаться обязательно в двойных словах. Хотя на [ВМ 370 
такого ограничения нет, эффективность вычислений резко сни- 
жается, если элементы данных размещены иначе. [То этим при- 
чинам все компиляторы ВМ 360-370 пытаются отводить целым, 
вещественным и логическим переменным поле длиной в слово, а 
переменным с двойной точностью — двойное слово. 

При программировании на Фортране необходимо знать со- 
глашения о словах и двойных словах, поскольку незнание этих 
соглашений может помешать компилятору правильно распреде- 
лить память под переменные, если мы пользуемся инструкциями 
СОММОМ и ЕОЛУАГЕМСЕ. Рассмотрим в качестве примера 
следующие декларации: 


ВЕАЕ В(2) 
ОСбУВЕЕ РВЕСТЗТОМ 01, 02 
ЕСОТУАКЕМСЕ (01,8(1)), (02,8292 
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Этот набор деклараций требует, чтобы память была распределена 
следующим образом: 


Но если для О] отведено двойное слово, то 02 не попадет на 
границу двойного слова, и наоборот. На машинах серии 360 
такое распределение привело бы к неисправимой ошибке (нару- 
шение границ), а на [ВМ 370 это привело бы к существенному 
увеличению времени вычислений. 

Не столь очевидное затруднение возникает при выполнении 
следующей последовательности деклараций: 


АЕАЕ В 
ОСУВЕЕ РВЕСТЗТОМ О 
ЕСИТУАСЕМСЕ (8,0) 


Может показаться, что выполнить такое распределение не со- 
ставляет труда, поскольку любой компилятор должен отвести 
для О двойное слово, а потому и К, и О будут расположены 
правильно. К сожалению, большинство компиляторов при оп- 
ределении границ «смотрят» только на первую переменную в 
ЕСЛУАГЕМСЕ. Поэтому пара (К, О) интерпретируется так, 
что переменные желательно выравнять только на границу слова. 
В противоположность этому 


ЕСЧТУАГЕМСЕ (р, К) 


предполагает выравнивание на границу двойного слова. 
Задавая эквивалентность литерных переменных и перемен- 
ных других типов, литерные переменные в ЕОЧТУАГЕМСЕ 
следует записывать последними, поскольку для этого типа дан- 
ных никаких требований на установление границ не существует. 
Проблема при использовании инструкции СОММОМ воз- 
никает в связи с тем, что всякая общая область начинается с 
границы двойного слова. Поэтому, если р — переменная с двой- 
ной точностью, а К — вещественная переменная, то инструкция 


СОММОМ Р, В | | 
обеспечивает правильное выравнивание, а инструкция 
СОММОМ К, О 


неправильное. Эти потенциальные затруднения всегда могут 
быть устранены за счет такой организации общей области, при 
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которой переменные с двойной точностью располагаются перед 
вещественными, целыми или логическими переменными. Ли- 
терные переменные следует располагать в конце общей области. 


6.8.2. Типы переменных 


Ранее мы познакомились с пятью типами переменных Форт- 
рана: ООВГЕ РКЕСЗЮОМ, КЕАЁГ, ПМТЕСЕК, ГОС1СА! и 
СНАВАСТЕВаи. Кроме того, в некоторых диалектах Фортрана 
для ВМ 360-370 допускаются переменные типов ВЕАГ+8, 
ЮЕА[.*4, 1МТЕСЕВ «4, [МТЕСЕКВ «2, ГОС]1САТ +4 и ГОС1САГ 1. 
Цифры в этих декларациях определяют число байтов памяти, 
которое отводится для переменной. Так, декларация КЕА[ 8 
эквивалентна РОПОВТЕ РЮВЕСЦЗОМ; ВКВЕАГ 4 эквивалентна 
РЕАГ: 1МТЕСЕК+«4 — ГПМТЕОЕК ; ГОССАТ4 — ГОССАГ.. 
Лишь ПМТЕСЕВ*2 и ГОСЧСАГ*| можно считать расширением 
того языка, которым мы занимались до сих пор. 

Переменные типа 1МТЕСЕК*2 являются двухбайтовыми 
целыми и хранятся в памяти в адресуемых полусловах. Этот 
тип переменных следует использовать в том случае, если пред- 
полагается, что целые значения по абсолютной величине будут 
не больше, чем 32 767, т.е. (21:—1). Если необходим большой 
массив целых чисел, применение декларации ПМТЕСЕК*х2 может 
дать существенную экономию памяти. Но эта декларация не 
лишена и некоторых недостатков. Основной из них — нестан- 
дартность данного типа переменной. Его использование может 
ограничить портативность программ. 

В некоторых моделях 1ВМ 360 существует проблема эффек- 
тивности, связанная с применением ПМТЕСЕК=2. Для выпол- 
нения арифметических операций с полусловами может потребо- 
ваться машинного времени больше, чем при работе со словами. 
Например, на [ВМ 360 модели 65 операция сложения полуслов 
занимает на 28% машинного времени больше, чем та же операция 
со словами. Эта очевидная аномалия объяснима: машина модели 
360/65 приспособлена для выполнения операции сложения только 
со словами. Сложение полуслов выполняется преобразованием 
полуслов в эквивалентные слова (путем распространения зна- 
кового разряда на два байта влево), затем происходит сложение 
образованных Таким образом слов и, наконец, обратное преоб- 
разование результата в полуслово. Если для результата требу- 
ется более 16 битов, то усеченный результат оказывается невер- 
ным. К сожалению, аппаратные средства в машинах [ВМ 360-370 
не обнаруживают таких ошибок переполнения полуслова. 

В свете вышеприведенных доводов за и против декларацией 
[МТЕСЕВЮ*2 следует пользоваться разумно. Например, часто 
используемые счетчики никогда не должны быть типа ПМТЕСЕКх2. 
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Если переменные типа [МТЕСЕКх»2 включены в инструкции 
Е,/ОТУАГЕМСЕ или СОММОМ, они должны быть расположены 
после переменных двойной точности, вещественных, целых и 
логических переменных, но перед литерными переменными. 
Такое расположение переменных гарантирует, что этим целым 
переменным будут отведены полуслова. 


6.8.3. Переменные типа ГОССА+1 и действия 
с литерами 


Поскольку логические переменные могут принимать только 
значения ТРОЕ. и .ЕАГЗЕ. ‚ кажется излишним отводить 
им поля длиной в.слово (32 двоичных разряда). Идеально было 
бы использовать только один бит для каждой такой переменной. 
К сожалению, память поразрядно не адресуема, и поэтому луч- 
шее, на что можно рассчитывать, это использовать один байт. 
Именно это и происходит, когда мы объявляем логическую пере- 
менную ГОССАГ 1. Как и в случае с ПУТЕСЕК -2-переменной, 
применение переменной [ГОСТСАГ*| может сэкономить память, 
но нарушит мобильность программы. 

В основном переменные типа ГОС1ТСАГ «| применяют для 
работы с литерами, когда в компиляторе переменные литерного 
типа не предусмотрены. В связи с тем что для хранения литеры 
требуется один байт, память можно существенно сэкономить, 
если цепочки литер запоминать в массивах типа [ОССАГ +1, 
а не в целых, вещественных или логических массивах. Однако 
это преимущество несколько уменьшается по той причине, что 
нельзя воспользоваться операцией сравнения для переменных 
типа [ОС]СА1*|[. Для обхода этого препятствия программисты 
часто пишут короткие подпрограммы, в которых сравнение 
ГОСТСАТ*1-переменных выполняется косвенно. Иллюстриру- 
емая здесь функция СНЕ — одна из таких подпрограмм. Она 
возвращает значение .ТКОЕ. в том случае, если переменные 
СГ и [2 типа ГОСТСАТ 1 содержат идентичные значения. 
ГОСТСАЕ РОМСТЮМ СНЕ (М, 12 
С = ‚ СРАВНЕНИЕ ОДИНочныхХ "ЛИТЕР. ‘являющихся’ " ЗНАЧЕ. 
С: НИЯМИ ПАРАМЕТРОВ 11, 12 ТИПА ГОСТСАГ=1. 

С: ‚ ИСПОЛЬЗУЕМЫЙ МЕТОД —Г1| и 1.2 ПЕРЕСЫЛАЮТСЯ В КРАЙ- 
С: :# НИЕ ПРАВЫЕ БАЙТЫ ЦЕЛЫХ ПЕРЕМЕННЫХ Е1УАГ. И 
С + 2УАГ. СООТВЕТСТВЕННО. ФУНКЦИЯ ВОЗВРАЩАЕТ 
С РЕЗУЛЬТАТ СРАВНЕНИЯ ЭТИХ ДВУХ | ПЕРЕМЕННЫХ. 

С ОСИСАЕ Е 1, 2, ЛЕХТ (4), ГЗЕХТ (4) 


1МТЕСЕВ 1ЛУАГ, Т.2УАГ 
ЕОПТУАГЕМСЕ (11УАТ, ЕХТ(1)), (1.2УАТ, Т.2ЕХТ (1) 


ЗАНУЛИТЬ ТГ1УАРГ и 12УАГ. ПРИСВОИТЬ ЗНАЧЕНИЯ 11 
И 12 КРАИНИМ ПРАВЫМ БАИТАМ. 


ххх хххх 


ФФ) 
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С ПРИСВОИТЬ ПЕРЕМЕННОЙ СНЕО ЗНАЧЕНИЕ „ТВОЕ., ЕСЛИ 
С Г1УАГ=1.2У АГ. 

Г1УАТ=0 

[.2УАГ=0 

Г1ЕХТ (4)=1.1 

Г2ЕХТ (4)=1.2 

СНЕО= ((1УАГ .ЕО. 12УАГ.) \ 

КЕТОВМ 

ЕМО 


6.9. Представление чисел в ЭВМ О0ЕС-10 


В ЭВМ БЕС-10 целые и вещественные числа хранятся в сло- 
вах длиной 96 двоичных разрядов (12 восьмеричных цифр). 
Целые числа представлены в машине в дополнительном коде. 
Деление на ноль, ошибки переполнения в операциях над целыми 
и вещественными числами, включая те, что происходят в резуль- 
тате умножения целых чисел, обнаруживаются машиной. 

Вещественные числа запоминаются в нормализованном виде; 
используется формат 


Мантисса 


Знак | Порядок 
0 | —8 9—35 


Отрицательные вещественные числа представлены в дополни- 
тельном коде. Порядок увеличен на 128 по сравнению с двоичным 
показателем. Так, например, десятичные числа 25.75 и —25.79 
хранятся (в восьмеричной системе счисления) в виде 


205 : 634000000 
И 
072 : 144000000 


соответственно. Заметьте, что отрицательное число —25.75 об- 
разовано по правилам дополнительного кода во всех двоичных 
разрядах, включая порядок, по отношению к представлению 
числа 25.75. 

Структура представления чисел с двойной точностью в ста- 
рых моделях (КА-процессоры) ОРЕС-10 отличается от более со- 
временных моделей (К]- и КГ-процессоры). На КА-процессоре 
числа с двойной точностью хранятся в виде 


| Знак Порядок Мантисса | Порядок — 27 | Мантисс 2 


Знак 


0 | —8 9—35 36 37 —44 45—71 


Так, например, десятичное число 262144.0009765625=218--- 2-10 
(в восьмеричной системе) будет представлено следующим образом: 


223 : 400000000 170 : 200000000 
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Бит знака каждого слова равен нулю. Первый порядок 223 (в 
восьмеричной системе) представляет десятичный порядок 19. 
Второй порядок 170 представляет десятичный порядок — 8. 
Соответствующее десятичное число равно 


„бете - .262-8=218--2-10 


Таким образом, для представления чисел с двойной точностью 
в КА-процессоре требуется 9 лишних битов. В противополож- 
ность этому К[- и КГ-процессоры для увеличения точности 
дробной части используют все биты второго слова, кроме зна- 
кового. В этих процессорах 262144.0009765625 запоминается как 


223 : 400000000 1900000000000 


Арифметика вещественных чисел на ОЕС-10 дает точность 
8 десятичных цифр (27 битов). КА-процессоры обеспечивают 
точность 16 десятичных цифр (54 бита) при работе с числами двой- 
ной точности. К]- и КГ-процессоры улучшают точность до 18 
десятичных цифр (62 бита). Диапазон представления чисел во 
всех рассмотренных случаях составляет примерно от 10738 
до 1038 (от 27129 до 2177). 


6.10. Организация памяти ЭВМ ОЕС-10 


В отличие от машины [ВМ 360-370, которые считаются «байт- 
ориентированными», РЕС-10 — «слово-ориентированные» маши- 
ны, т.е. у них наименьшая адресуемая ячейка памяти — это 
слово длиной 36 двоичных разрядов. Вещественные, целые и 
логические переменные могут быть размещены в любом слове 
памяти. И что особенно ценно, переменным с двойной точностью 
могут быть отведены любые пары последовательных слов неза- 
висимо от адреса. Операций над целыми полусловами в РЕС-10 
нет, логическим переменным нельзя отвести поле памяти длиной 
менее слова. 

Такая ориентация на слово имеет свои достоинства и недо- 
статки. Положительная сторона — программисту не нужно 
заботиться о выравнивании данных на соответствующие границы, 
и поэтому упорядочения переменных в инструкциях СОММОМ 
и ЕОЧТУАГЕМСЕ не требуется. 

Недостатком такой ориентации является отсутствие гиб- 
кости. Целые переменные должны занимать 36 битов даже в 
том случае, когда их диапазон ограничен небольшими величи- 
нами. Что еще хуже, в стандартных компиляторах Фортрана 
для этих машин не обеспечена возможность работы ни с литер- 
ными переменными, ни с эквивалентом переменных типа ГОС]- 
САЁ+1. Для обхода этих последних ограничений при програм- 
мировании на Фортране для РЕС-10 обычно работают с данными, 
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представленными как числа с фиксированной точкой, и опера- 
циями бит-маскирования для упаковки в слово и распаковки 
из слова пяти литер в коде АЗСИ (по 7 бит на литеру). 


Упражнения 


6.01. Запишите 10-разрядное двоичное представление числа —21 в прямом, 
обратном и дополнительном кодах. 


6.02. Запишите все 10-разрядные двоичные представления числа ноль в пря- 
мом, обратном и дополнительном кодах. 


6.03. Какие десятичные числа представлены 10-разрядным двоичным числом 
1111100111 в прямом, обратном и дополнительном кодах? 


6.04. Какой результат получится при сложении 10-разрядных двоичных чисел 
1111110110 и 0000001101 в прямом, обратном и дополнительном кодах? 


6.05. Какие десятичные числа представлены восемью шестнадцатеричными циф- 
рами (если код дополнительный)? 


000001ЕЕ 
ЕРЕРЕРЕО 


6.06. Какие десятичные числа представлены 12 восьмеричными цифрами (если 
код обратный)? 


7777771777000 
000000001 162 


6.07. Следующие шестнадцатеричные цепочки представляют два вещественных 
числа в [ВМ 360—370: | 


ВЕСо0000 417А8000 


а) Какие десятичные числа они представляют? 
6) Чему равно щестинадцатеричное представление их суммы? 


6.08. Следующие восьмеричные цепочки представляют два вещественных числа 
в РЕС-10: | 


574150000000 207765600000 


а) Какие десятичные числа они представляют? 
6) Чему равно восьмеричное представление их суммы? 


6.09. Следующая шестнадцатеричная цепочка представляет число с двойной 
точностью в 1ВМ 360—370: 


46100000 ©0000000 
Какое двоичное число представляет эта цепочка? 


6.10. Следующая восьмеричная цепочка представляет число с двойной точ- 
ностью в ОЕС-10 с процессором КГ: 


217707000213 3300000000000 
Какое двоичное число она представляет? 
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6.11. Предположим, что мы работаем с 1ВМ 360 или 370 и нам нужна общая 
область, которая содержит каждую из переменных, декларируемых ниже: 


ОСОВЕЕ РВЕСТЗТОМ 0 
ТМТЕСЕВ Т 

ТМТЕСЕВ*2 К1(3), К2(4) 
КОСТСАЬ*1 1,2 


Чтобы правильно выравнять переменные на соответствующие границы, мы 
описываем общую область так: 
СОММОМ О.Т, К1(3), К2(4), ГЛ, 1.2 


Конечно, существуют и другие декларации, которые обеспечивают правильное 
выравнивание границ. Приведите все допустимые в данном случае декларации. 


Глава 7 


СТРУКТУРА ПРОСТОЙ ЭВМ 


В этой главе мы кратко рассмотрим основные устройства ЭВМ 
н затем дадим описание простой гипотетической машины. Наша 
цель состоит в том, чтобы показать, как выполняются програм- 
мы, И заложить основы для изучения в гл. 8 компиляторов и 
загрузчиков. 


7.1. Устройства ЭВМ 


Большинство ЭВМ состоит из следующих основных четырех 
устройств: центрального процессора (ЦП), арифметического и 


=== 


——>: Данные 
—->: Управление 


Рис. 7.1. Взаимодействие между устройствами ЭВМ. 

логического устройства (АУ), главной (оперативной) памяти 
(ОП) и набора устройств ввода/вывода (В/В). Рис. 7.1 иллюстри- 
рует основные взаимосвязи между этими устройствами. 


7.1.1. Оперативная память 


Это устройство состоит из ячеек, в каждой из которых может 
храниться число. Числа могут представлять значения данных 
или команды машинного языка. При этом не проводится ника- 
кого различия между ячейками, содержащими данные или ко- 
манды. 

Каждая ячейка оперативной памяти ЭВМ имеет свой адрес. 
Адреса используются для обращения к данным и передачи уп- 
равления между командами. 
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Оперативная память сама по себе не обрабатывает данные. 
В ней выполняются только операции выборки и записи. Для 
выполнения этих операций оперативная память связана с уст- 
ройством управления и с двумя управляющими словами, назы- 
ваемыми регистром адреса (РА) и регистром данных (РД о) 
(рис. 7.2). 

Устройство управления памятью получает запросы от ЦП, 
АУ или В/В на выполнение операций «выбрать» и «записать». 
Оно может обрабатывать только один запрос в каждый момент 
времени. Если запрос поступил в тот момент, когда память 
недоступна, устройство управления ставит этот запрос в оче- 
редь, и он ожидает выполнения. | 


— — ——- Выбрать 
_-—--- Записать 


У статус 
(доступна, недоступна) 


——> : Данные 
——-> : Управление 


Рис. 7.2. Структура оперативной памяти. 


При запросе на запись требуется передать в устройство 
памяти адрес и элемент данных, который должен быть записан 
в ячейку памяти с этим адресом. Операция записи выполняется 
засылкой адреса в регистр РА, данных в регистр РД и после- 
дующим указанием устройству памяти произвести запись. При 
запросе на выборку требуется передать в устройство памяти 
адрес ячейки, содержимое которой должно быть считано. Опе- 
рация выборки выполняется передачей адреса в регистр РА 
и указанием устройству памяти выполнить чтение. Устройство 
памяти пересылает содержимое ячейки с этим адресом в регистр 
РД. Наконец, устройство, затребовавшее элемент данных, счи- 
тывает содержимое регистра РД. Эти действия могут быть рас- 
писаны следующим образом: 

Запись: Ждать пока станет доступной ОП. 
РА =<- адрес ячейки для записи данных. 
РД =<- элемент данных, который требуется записать. 
Послать сигнал запроса на запись. 
Выборка: Ждать пока станет доступной ОП. 
РА -=<—- адрес ячейки, содержащей элемент данных. 
Послать сигнал запроса на выборку. 
Прочесть содержимое РД. 


1) В оригинале МАК и МОК; последний ипогда называют буферным ре- 
гистром (МВК).— Прим. ред. | 
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7.1.2. Центральный процессор 


Основная функция центрального процессора — обеспечить 
последовательность выполнения команд в программе и управ- 
ление выполнением каждой отдельной команды программы. 
Для того чтобы обеспечить последовательность выполнения ко- 
манд, ЦП взаимодействует с управляющим словом, называемым 
‘программным счетчиком (ПС). В этот счетчик первоначально 
заносится адрес первой команды программы и после выполнения 
каждой команды он изменяется, т. е. туда заносится адрес сле- 
дующей выполняемой команды. 

Приведенная ниже схема показывает упрощенный алгоритм 
работы ЦИ при последовательном выполнении команд про- 
граммы: 


Инициализация: [С < адрес первой команды. 

Выборка: Ждать, пока не станет доступной ОП. 
РА = ПС. | 
Послать сигнал запроса на выборку. 
КОМАНДА = РД. 

Приращение: ИС = ПС. 

Декодирование: Определить, какого типа команда; если 
команда недопустимая, прекратить выпол- 


нение. 
Выполнение: Управлять выполнением команды. 
Цикл: Передать управление на шаг «Выборка». 


Увеличение программного счетчика ПС на | означает, что 
далее будет выполняться следующая по порядку команда. Если 
эта команда окажется командой передачи управления, то на 
шаге «Выполнение» произойдет изменение программного счет- 
чика. Действительно, если команда вызывает передачу управ- 
ления в ячейку АДР, то на шаге «Выполнение» значение АДР 
будет помещено в регистр ПС. Таким образом может быть изме- 
нена последовательность выполнения команд. 


7.1.3. Арифметическое и логическое 
устройство 


АУ это та часть ЭВМ, которая выполняет арифметические 
и Логические операции. Устройство обычно всегда содержит 
аппаратные средства для выполнения арифметических операций 
(сложения, вычитания, умножения и деления) над целыми чис- 
°лами и операций сравнения целых чисел. Дополнительно мно- 
гие ЭВМ могут выполнять соответствующие операции над чис- 
лами с плавающей точкой. 
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Для реализации вычислений и запоминания полученных ре- 
зультатов АУ имеет несколько ячеек памяти, называемых реги- 
страми. Они используются для запоминания операндов и ре- 
зультатов выполнения операций. 


7.2. Простейшая машина 


7.2.1. Подробное описание машины $ЗАО$АС 


Для более подробного описания устройств ЭВМ рассмотрим 
условную десятичную машину ЗАОЗАС ($АШЗАС — сокраще- 
ние от ЗппрИНед уегз1оп оЁГ А Весипа! $11$]е Адагез$ Сотрищег 
«Упрощенная версия десятичной одноадресной ЭВМ»). Машина 
имеет следующие характеристики: 


Оперативная память. 100 ячеек с адресами от 00 до 99. В каж- 
дой ячейке могут храниться три десятичные цифры плюс знак. 


Устройства ввода/вывода. Одно устройство ввода с перфокарт 
и одно печатающее устройство. 


Арифметическое устройство. Содержит один 3З-разрядный 
десятичный регистр (со знаком), называемый сумматором (сок- 
ращенно СМ). 


Формат команд. Каждая команда имеет форму -Есаа, где 
па — адрес памяти и -с — код выполняемой операции. 


ЗАРЗАС выполняет следующие команды: 


—=0: недопустимый код операции; 

-—-1: очистить сумматор (СМ); 

--2: загрузить СМ содержимым ячейки памяти аа; 

--3: записать содержимое СМ в ячейку памяти аа; 

--4: прибавить содержимое аа к СМ; 

--5: вычесть содержимое аа из СМ; 

6: умножить СМ на содержимое аа; 

7: разделить СМ на содержимое аа; 

--8: прочитать целую величину со следующей перфокарты и 
записать ее в аа; 

-—-9: напечатать содержимое аа; 

—1: передать управление в ячейку аа, т.е. занести аа в 
программный счетчик; 

—2: передать управление в аа, если СМ= 0: 

—3: передать управление в аа, если СМ>>0; 

—4: передать управление в аа, если СМ< 0; 

—5: передать управление в аа, если в результате выполнения 
последней арифметической операции получилось число, 
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превышающее максимально допустимое (эта ситуация 
называется переполнением); 

—6: передать управление в аа, если СМ=^0; 

—7: передать управление в аа, если СМ=0; 

—8: передать управление в аа, если СМ>0; 

—9: остановить выполнение программы. 


Приведенный набор команд, конечно, проще, чем в любой ре- 
альной ЭВМ, однако он достаточен для логического анализа форт- 
ранных программ. Основными ограничениями здесь являются 
длина слова, размер памяти и трудности, возникающие при вы- 
полнении действий над числами с плавающей точкой. Проил- 
люстрируем работу переведенной на машинный язык ЗАОЗАС 
следующей простой фортранной программы: 


С*+%+* ВЫЧИСЛЕНИЕ ФАКТОРИАЛА М **** 

[МТЕСЕВ М, РА 
ВЕАО (5,10} мы 

10 РОВМАТ ( 112 } 
РАСТ = 1 
ТЕ (М (Е. 1) 60 ТО 30 
0 20 Г=2.м 

РАСТ = РАСТ *% \{ 
20 СОМТТМЦИЕ 
30 МАТТЕ (6,10} РАСТ 


$ТОР 
ЕМО 
Ячейки памяти Содержимое Примечания 

00 -- 814 Прочитать значение \. 
0] | —-217 Если значение М меньше или равно 
02 —-514 единице, перейти к печати результата 1. 
03 —812 
04 —-216 
05 —-615 Умножить следующий множитель на те- 
06 315 кущее значение и сохранить его. 
07 —-216 КАСТ. 
08 —417 Вычислить следующий множитель и сох- 
09 — 316 ранить его в 1. 
10 514 Если вычисление не закончено, то пов- 
| И —704 торить умножение. | 
12 —-915 Напечатать значение факториала М. 
13 —900 Останов. 
14 —-000 №. 
15 —-001 КАСТ (начальное значение 1). 
16 —002 Индекс цикла |, первоначально 2. 
17 001 Константа [. 
18 несущественно 
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Программирование на машинном языке утомительно и сопря- 
жено с ошибками. В программе трудно делать изменения, так 
как из-за одной незначительной модификации может появиться 
большое число неверных адресов. Например, если бы мы решили 
напечатать значение М, как только оно прочитано, следовало бы 
вставить команду -- 914 в ячейку 01. Эта вставка привела бы к сме- 
щению вниз на одну ячейку всех последующих команд и данных. 
Такое смещение потребовало бы изменить адрес переходов и ад- 
реса данных. В частности, адрес ячейки М был бы не 14, а 15. 
Для того чтобы программы было легче писать и изменять, про- 
граммисты обычно составляют машинно-ориентированные про- 
граммы не на машинном языке, а на языке ассемблера. 


7.2.2. Язык ассемблера для машины $АБЗАС 


В языке ассемблера можно пользоваться символической ад- 
ресацией памяти, а также мнемоническими обозначениями для 
кодов операций. Допустим, мы разработали для машины ЗАРЗАС 
язык, в Котором команды имеют следующий формат: 


Колонка 1—8 10—13 15—22 25—72 
Назначение метка КОП — операчд комментарий 


где метка содержит от одной до восьми летер; КОП — код опе- 
рации, содержит от одной до четырех букв и является мнемониче- 
ским обозначением машинной команды или команд СОМ, ЕМО; 
операнд зависит от кода операции; комментарий — любой текст. 

Дозволенные коды операций языка ассемблера и их значение 
приведены ниже: 


Мнемоническое Эквивалентный код Операнд 
обозначение машинной команды 

ГЕВО 1 отсутствует 
ГОАО 2 метка 
5ТОЮ 3 метка 
АБО 4 метка 
ЗОВ —-5 метка 
МОГ, -6 метка 
ОГУ 7 метка 
ЮКЕАО --8 метка 
РКМТ -|- метка 

ВЮ —1 метка 
ВЮ —2 метка 
ВКР —3 метка 
ВЮМ —4 метка 
ВЮО —5 метка 
ВВМ —6 метка 
ВЮМР —7 метка 
ВЮММ —8 метка 
ТОР —9 отсутствует 
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СОМ определяет начальное целая величина 
значение данных 
ЕМР отмечает физический отсутствует 


конец программы 


Программа на языке ассемблера, эквивалентная программе вы- 
числения факториала М, написанной на машинном языке, при- 
_ведена ниже: 


КЕАР М ВВЕСТИ ЗНАЧЕНИЕ М. 
ГОАО ОМЕ ЕСЛИ М МЕНЬШЕ ИЛИ РАВНО 1, 
ЗОВ М ТО ПЕРЕИТИ К РОМЕ. 
ВКММ РОМЕ 
МЕХТ ГОАО 1 УМНОЖИТЬ ЗНАЧЕНИЕ ЕАСТ НА 
МОГ. ЕАСТ СЛЕДУЮЩИЙ ЧЛЕН ПОСЛЕДОВАТЕЛЬНОСТИ, 
ЭТОК КАСТ 
ГОАО 1 
и ОМЕ ВЫЧИСЛИТЬ НОВЫЙ ЧЛЕН. 
УТОК 1 
ИВ М ЕСЛИ ОН ПРЕВЫШАЕТ М, ПЕРЕЙТИ К 


ВКМР МЕХТ ПРОМЕ ЕСЛИ НЕТ, ПРОДОЛЖИТЬ 
РОМЕ РЕМТ РАСТ ВЫЧИСЛЕНИЯ.ООМЕ — НАПЕЧАТАТЬ РЕЗУЛЬ- 


ТОР ТАТ. 
М СОМ 0 ЗДЕСЬ ХРАНИТСЯ М. 
КАСТ СОМ 1 ЗДЕСЬ ХРАНИТСЯ ФАКТОРИАЛ. 
] СОМ 2 ПЕРВЫЙ ЧЛЕН ФАКТОРИАЛА, 
ОМЕ с | КОНСТАНТА 1. 

ЕМ 


Программа стала намного понятней. Заметим, насколько лег- 
че модифицировать программу на языке ассемблера. Например, 
если бы потребовалось напечатать значение М после его считыва- 
ния, мы бы просто вставили команду РКМТ М после команды 
ЮЕАШО. Никакие другие команды в связи с внесением этого до- 
бавления не нужно изменять. 


При изучении ЗАОЗАС невольно возникает вопрос: как вы- 
полнять операции над массивами? Так как индексами восполь- 
зоваться нельзя, то может показаться, что мы ограничиваем вы- 
числения только простыми переменными. Это не так. Принцип 
обработки массивов основан на том, что ячейки памяти, содержа- 
щие команды, ничем не отличаются от ячеек, в которых содер- 
жатся данные. Таким образом, команды можно обрабатывать 
как данные, т. е. их можно изменять. Рис. 7.3 иллюстрирует эту 
возможность. На рисунке изображены две эквивалентные про- 
граммы: одна на Фортране, другая на языке ассемблера машины 
ЗАРЗАС. Программа считывает данные и печатает их в обратном 
порядке. 
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Зоя ив анриирраненый$ 


6+** ПЕЧАТЬ ВХОДН. ДАННЫХ В ОБРАТН, ПОРЯДКЕ 


10 


20 


30 


ТМТЕСЕВ (1$Т1{10), М 
ВЕАО (5,10) М 
РОВМАТ { 112 ) 
00 20 Т=а, М 
ВЕАО (5,10) 115101} 


СОМТТМИЕ 
00 30 Гг=1, М 
К = №1 -Т 
МАТТЕ (6,10) К1$5Т(К} 
СОМТТМУЕ 
ТОР 
ЕМО 


(а) Программа на Фортране, печатающая входные данные в обратном 


порядке 
ВЕАО 
МЕХТЕВО гОАр 
ло 
ТОК 
юо2 КЕАО 


ГОАО 


В 
МЕХТУК Гор 


СОМ 


ЕМО _ 


М 


| 
КО! 
КО? 
ЕТ$Т 


| 
ОМЕ 
1 


КОЛИЧЕСТВО ДОПОЛНИТЕЛЬНО СЧИТЫВАЕ«- 
МЫХ КАРТ 

ИЗМЕНЕНИЕ ВЕАО ДЛЯ ОБРАЩЕНИЯ К 
СЛЕДУЮЩЕМУ ЭЛЕМЕНТУ МАССИВА 


**+ ЭТА ИНСТРУКЦИЯ ВЕАО 
МОДИФИЦИРУЕТСЯ * 

УВЕЛИЧИТЬ СКЕЬНИК КАРТ И ПОСМОТРЕТЬ, 
ЕСТЬ ЛИ ЕЩЕ КАРТЬ 


ЕСЛИ ЕСТЬ, ПЕРЕДАТЬ УПРАВЛЕНИЕ НА 


М 
МЕХТЕР ВВОД СЛЕДУЮЩЕЙ ПЕРФОКАРТЫ 


МЕХ 


ВВЕДЕНЫ ВСЕ КАРТЫ, ВСЕ ЛИ НАПЕЧАТАНО? 


ЕСЛИ ДА, ИЗМЕНИТЬ РЕ!МТ ДЛЯ ОБРАЩЕ- 

НИЯ К СЛЕДУЮЩЕМУ ЭЛЕМЕНТУ, ДВИГАЯСЬ 

НАЗАД. 

к ЭТА ИНСТРУКЦИЯ МОДИФИЦИРУЕТСЯ +* 
Т\В ВЗЯТЬ СЛЕДУЮЩЕЕ ЗНАЧЕНИ 


ВЫХОД ПО ОКОНЧАНИИ РАБОТЫ 


Г.1$Т ИСПОЛЬЗУЕТСЯ ДЛЯ ФОРМИРОВАНИЯ ВЕАО 
ТУТ ИСПОЛЬЗУЕТСЯ ДЛЯ ФОРМИРОВАНИЯ РЮ1МТ 
0 ЧИСЛО СЧИТЫВАЕМЫХ КАРТ 

0 СЧЕТЧИК ДЛЯ ЦИКЛОВ 

1 ПОЛЕЗНАЯ КОНСТАНТА 

о МАССИВ ДЛЯ ЗНАЧЕНИЙ ПЕРФОКАРТ 

0 

0 

0 

0 

0 

0 

0 

0 


(6) Эквивалентная ЗАО$АС-программа 


Рис. 7.3. Обработка массивов в ЗАОЗАС. 


7.2.3. Моделирование машины 5АВ$АС 


Одна из интересных особенностей цифровых ЭВМ состоит 
в том, что на них можно моделировать операции других ЭВМ. 
Мы продемонстрируем эту возможность с помощью программы на 
Фортране (рис. 7.4), которая использует в качестве входной ин- 
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формации программу на машинном языке ЗАОЗАС и ее данные. 
На выходе распечатывается память машины ЗАОЗАС, какой она 
была до выполнения программы, строки, которые должны были 
быть выведены на печать в ходе работы ЗАОЗАС-программы, и, 
наконец, дампинг памяти после выполнения программы. Оста- 
нов ЗАОЗАС-программы может произойти по одной из следую- 
щих причин: 


1. Выполнена команда 5ТОР. 
2. Обнаружен неверный код операции (--0 или —0). 
3. Была попытка разделить на ноль. 
4. Нарушены границы памяти (обращение к несуществующей 
ячейке, например 100) 
5. Была сделана попытка прочитать данные после окончания 
ввода (уже была считана запись «конец файла»). 


Вводимая в имитатор ЗАОЗ$АС-программа (на картах) долж- 
на быть представлена в следующем формате: 


Колонки 2, 3. Целая величина в диапазоне между 0 и 99, пред- 
ставляющая адрес, связанный с этой перфокар- 
той. 

Колонки 6—9. Целая величина со знаком или без знака в диапа- 
зоне между —999 и -- 999, представляющая зна- 
чение, которое должно быть записано в память. 
Если эта величина выходит за допустимые раз- 
меры, выдается сообщение об ошибке и выпол- 
нение задания прекращается. 


Конец ЗАОЗАС-программы отмечается на  перфокарте 
„в колонке 1. Все другие колонки перфокарты игнорируются. 
Любые данные, считываемые ЗАРЗАС-программой, располага- 
ются за перфокартой с ограничителем *. 


Е В Л ЕЕ В ВЕ В В ЕЕ В ВЕ В В В А Е В Е 
ПРОГРАММА МОДЕЛИРОВАНИЯ $АОЗАС 
ЭТА ПРОГРАММА ВВОДИТ НАБОР ПЕРФОКАРТ, ОПРЕДЕЛЯЮЩИХ 
НАЧАЛЬНОЕ СОДЕРЖИМОЕ ПАМЯТИ МАШИНЫ. КАЖДАЯ ВХОДНАЯ 
КАРТА ПРЕДСТАВЛЕНА В ФОРМЕ: 
Колонки 2—3: НОМЕР ЯЧЕЙКИ, ЗАНИМАЕМОЙ ДАННЫМ 
КОЛОНКИ 6—9: СОДЕРЖИМОЕ ЭТОГО СЛОВА. 


вбобооооо 
ххх 
ххх 


Рис. 7.4. Программа моделирования ЗАОЗАС. 
(Текст в инстр. 15: «»# Ошибка з» Неправильная команда — », «в ячейке»; 
31: ««»+Ошибка +* Неожиданный конец файла»; 45: «+=Программа не выпол- 


рации»; 667: «„.Ошибка += Значение РС больше 99»; 778: «+= Ошибка з# Де- 
ление на ноль»; 889: < Ошибка зв Неожиданный конец файла»; 10: «+ Дамп 
системы ЗАОЗАС = », «Программный счетчик», «Сумматор», «Содержимое па- 
мяти»; 15: «Ячейки». ) 


[= 
“®) 
© 


ббобооосоовоооооооовосоооососовово 


о 2 К А 2 КАК 


ххх ххх 


со ап + -5Я 


Гл. 7. Структура простой ЭВМ 


КОНЕЦ ВСЕХ ТАКИХ ПЕРФОКАРТ ОТМЕЧАЕТСЯ КАРТОЙ, СОДЕРЖА- 
ЩЕЙ * В КОЛОНКЕ 1. ЭТА ПЕРФОКАРТА НЕ СОДЕРЖИТ НИКАКИХ 
ДАННЫХ. ЗА КАРТОЙ СО *« СЛЕДУЕТ НАБОР КАРТ, СЧИТЫВАЕ- 
МЫХ (ПОЛЬЗОВАТЕЛЬСКОЙ ПРОГРАММОЙ НА ЯЗЫКЕ МАШИНЫ 
$5АО$ 


СОЗДАВАЕМЫЙ ВЫХОД: 
ДАМП ПАМЯТИ ПОСЛЕ НАЧАЛЬНОЙ ЗАГРУЗКИ ПРОГРАММЫ; 
ТРАССИРОВКА ВЫПОЛНЕНИЯ ВСЕХ КОМАНД (ЕСЛИ ТВАСЕ = 
ТК ); 
я: ПО КАЖДОЙ КОМАНДЕ РВМТ В ПРОГРАММЕ ПОЛЬЗО- 
ВАТЕ 
ДАМП КОНЕЧНОГО СОДЕРЖИМОГО ПАМЯТИ; 
СООБЩЕНИЯ ОБ ОШИБКАХ 


ОБЩИЕ ПЕРЕМЕННЫЕ: 


МЕМ — — СПИСОК ТЕКУЩЕГО СОДЕРЖИМОГО ПАМЯТИ; 
РС — ПРОГРАММНЫЙ СЧЕТЧИК; 
АС — СУММАТОР; 
РКТ —— НОМЕР УСТРОЙСТВА ПЕЧАТИ; 
КОК —— НОМЕР УСТРОЙСТВА ВВОДА: 
ТКС — НОМЕР УСТРОЙСТВА ДЛЯ ВЫВОДА ТРАССИРОВКИ; 


ОУЕРГО\М/— ЕСЛИ ТВОЕ, ТО ПОСЛЕДНЯЯ АРИФМЕТИЧЕСКАЯ 
ОПЕРАЦИЯ ВЫЗВАЛА ПЕРЕПОЛНЕНИЕ: 

ТКАСЕ — УСТАНАВЛИВАЕТСЯ В ТКОЕ, ЕСЛИ НЕОБХОДИМА 
ТРАССИРОВКА. 


ВЫЗЫВАЕМЫЕ ПОДПРОГРАММЫ: 
РОМР — РАСПЕЧАТЫВАЕТ СОДЕРЖИМОЕ ПАМЯТИ; 
МТЕВР — ИНТЕРПРЕТИРУЕТ $АОЗАС-ПРОГРАММУ. 


ПРОГРАММИСТ: — — — ДАТА: — — — 
ххх 


ЧИТЕСЕР 106, $ТМТ, ОЕЕМ, ОЕБ 

КОСТСАЕ ЕХЕС 

ЦОСТСАЕ О\МЕГОМ, ТААСЕ . 
МТЕСЕВ МЕМ( 100), РС, АС, РАТ, ВОВ, ТАС 

СОММОМИЗАОЗАСИ МЕМ, РС, АС, РАТ, КОЯ, ТАС, ОУРЕОЫ, ТААСЕ, 
ОАТА ЕСИ" И, ЕХЕСИ ТВИЕ‹ / 


ВВЕСТИ СЛЕДУЮЩУЮ КАРТУ ЗАОЗАС-ПРОГРАИМЫ 
АЕАО (А0А,11,ЕМО=30} ОЕЁТМ, ОС, $ 


РОВМАТ © А1» 12» 2Х» 14 \ 


КОНЕЦ ПРОГРАММЫ ПОЛЬЗОВАТЕЛЯ 3 
т { ОЕБТМ «Е@» РЕБ 


` ПРАВИЛЬНО ЛИ ЗАПИСАНА МАШИННАЯ КОМАНДА? 
ТЕ © ТАВЗЕЗТМТЬ «АТ. 1000 ) 60 ТО 20 


„ОШИБКАХ ПРОГРАММА НЕ МОЖЕТ БЫТЬ ВЫПОЛНЕНА 
Е (РТ.15$ «ТИТ» 106 
ыы иНЫ- ЕКАОК . ТМУАСТО СОММАМО -= ?у 14, "АТ росАТТОНи, $2) 


св ТО 10 


КОМАНДА ВЕРНАЯ — ЗАПИСАТЬ ЕЕ. 
МЕМ(ЬОС+1Ь = 


ВЕРНУТЬСЯ К ЧТЕНИЮ СЛЕДУЮЩЕЙ КАРТЫ 
$0 ТО 10 


`Продолжение Рис. 7.4. 


ххх 
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с \ ы 

с ОШИБКА, НЕОЖИДАННЫЙ КОНЕЦ ФАИЛА 

30 ^ МАТЕ (РАТ,З1) 

31 РОАМАТ ('0+%* ЕАВОВ %* ИМЕХРЕСТЕС ЕМО-ОЕ-Е11Е! ] 
с $ТОР 

с КОНЕЦ ПРОГРАММЫ — ЕСЛИ В НЕЙ ОШИБКА, ОСТАНОВ 


40 — ТЕ { ЕХЕС № 60 ТО 50 
МАТТЕ (РАТ»45} 

45 — ОРМАТ ('0%% 
$ТОР 


с 
с НАЧИНАЕТСЯ ВЫПОЛНЕНИЕ — ДАМП ПАМЯТИ.) ИНТЕРПРЕТАЦИЯ 
50 — САС РИМР | 


САМ. 1НТЕВР 


[= 
ЗАВЕРША И 
‚$ САС РУМР Ющии ДАМП 
$ТОР 
ЕЮ 


$УВАОСИТТМЕ ТМТЕВР 
С зоо жхж 
<* ИНТЕРПРЕТИРОВАТЬ ПРОГРАММУ, ПОКА НЕ ВСТРЕТИТСЯ ТОР ИЛИ ОШИБКА. * 
<* ТРАССИРОВКА КОМАНД. ЕСЛИ 'ТВАСЕ! - ТВОЕ * 
С ххх 

ТМТЕСЕВ АООА, ТМ№5ТВ, ОРСООЕ, ММ, ОРТУР, УАЬЦЕ 

Г ОСТСАЕ ОУРЕОМ, ТААСЕ 

ТНТЕСЕА МЕМ( 100), РС, АС, РАТ, ВОК, ТВС 

СОММОМ/$АОЗАС/ МЕМ, РС, АС, РАТ, ВОК, ТАС, ОМЕЬОМ, ТААСЕ 


с 

Сл 4494044497526 0460 8 
< ВЫПОЛНИТЬ СЛЕДУЮЩУЮ КОМАНДУ #8 * 
С ЕСЛИ МЫ ВЫШЛИ ЗА ПРЕДЕЛЫ ПАМЯТИ , ОСТАНОВ 

“0 {Е С РС «СТ, 99 ) 60 Та 666 

с 

с ДЕКОДИРОВАТЬ СЛЕДУЮЩУЮ КОМАНДУ 


80 ТМ$Т8 = МЕМ(РС+1 ) 
ОРСООЕ = 1№5Т8/100 
АО0А = 1АВ$(1М5ТА - 0ОРСО0Е*100} 
ММ = МЕМСАООК+1) 
1Е { ТВАСЕ ) МАТТЕ (ТАС,90} РС, ТМ$УТА, ММ, АС 
90 А, ** ТААСЕ *% РС=',› 12, #1 Ма!, 14; "5ММа', 14: #АС=!,14) 
РС = РС+тТ 


с 9 
[> ПЕРЕХОД НА ИНТЕРПРЕТАЦИЮ ДАННОЙ КОМАНДЫ 
ОРТУР = ОРСООЕ + 10 
|. СО ТО (444,208,207,206,205,204%4,203,202,201,555, 
с х 101,102,4103,104:;105;:106, 101, 108;109) ОРТУР 


Продолжение Рис. 7.4. 


с ОРСООЕ = | -- ОЧИСТИТЬ СУММАТОР 
101 АС = 0 
60 ТО. 40 
с ОРСООЕ = 2 -- ОАО 
102 АС = мм 
60 ТО 40 
с ОРСООЕ = 3 -- $ТОВ 
103 МЕМ( АООВ+1) = АС 
60 ТО 40 
[в ОРСООЕ = 4 -- АОбО 
104 АС = АС + Мм 
СО ТО 150 
С ОРСООЕ = 5 -- $8 
105 АС = АС - ММ 
60 ТО 150 
с ОРСООЕ = 6 -- М 
106 АС = АС * ММ 
60 ТО 150 
с ОРСООЕ = Т -- 0 
с ПРОВЕРИТЬ, НЕ ПРОИСХОДИТ ЛИ ДЕЛЕНИЕ НА НОЛЬ 


107 ТЕ С ММ „ЕО. 0 ) 60 ТО 777 
АС = АС / ММ 


60 ТО 40 
с ОРСООЕ = 8 -- ВЕЛО 
с ЗДЕСЬ БЕСФОРМАТНЫЙ ВВОД МАТЕТМ. ЕСЛИ ВАШ 
с КОМПИМЯТОР НЕ ДОПУСКАЕТ ЕГО, ТО МОЖНО 
с ВОСПОЛЬЗОВАТЬСЯ ПОДПРОГРАММОЙ ЕОСНТМ. СМ. ГЛ. 3 
108 АЕАО (ВОВ,*,ЕМО=888) УАСИЕ 
МЕМ( АО0ОЯ +1) = МОО(УАСИЕ, 1000) 
60 ТО 40 
с ОРСООЕ = 9 -- РАМТ 


109 МАТТЕ (РАТ, 110} АООВ, ММ 
*}10 РОЯМАТ (’ СОМТЕМТ$ ОЕ КОСАТТОМ ', 12, * АВЕ *, 14} 
60 ТО 40 


с ЕСЛИ ПЕРЕПОЛНЕНИЕ, УСТАНОВИТЬ ФЛАГ ПЕРЕПОЛНЕНИЯ 
50 — ОУРЕОМ = с„ЕАЕЗЕ. 

1Е (ТАВЗ( АС) «ЕЕ. 999) 60 ТО 40 

АС = МО0{ АС, 1000) 

ОСУРЕОМ = „ТВОЕ. 


60 ТО 40 
С 
С ОРСООЕ = -1 -- ВК 
201 РС = АООВ 

60 ТО 80 
С ОРСООЕ = -2 -- ВАД 
202 1Е (С АС „ЕС. О ) РС = АООВ 

60 ТО 80 
С ОРСООЕ = -3 -- ВАР 
203 ТЕ (С АС „СТ. 0 ) РС = АООВ 

60 ТО 80 
С ОРСООЕ = -4 -- ВАМ 
204 1 САС ЕТ. 0 } РС = АООВ 

60 ТО 80 
С ОРСООЕ = -5 —- ВАО 
205 1Е © О\МЕСОМ ) РС = АООА 

60 ТО 80 
С ОРСООЕ к -6 -- ВАМ 
206 1Е { АС „МЕ. 0 } РС = АООВ 

60 ТО 80 
с ОРСООЕ = -7 -- ВАМР 
207 Е С АС . СЕ» 0 } РС = АООВ 

60 ТО 80 . 
С ОРСООЕ * -8 -- ВАММ 
208 12 САС „СЕ. 0 ) РС < АООВ 

60 ТО 80 
С ОРСООЕ « -9 -- ЗТОР 


444 МЕТТЕ (РАТ, 445) 
4%5 РОВМАТ ('0%% 
С0 ТО 999 


Продолжение Рис. 7.4. 
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ОКОНЧАНИЯ ПО ОШИБКЕ 


ПОПЫТКА ВЫПОЛНИТЬ ОРСОРЕ = 0 

555 — УВТЕ (РАТ, 556) 

556  РОВМАТ ('0%% ЕВАОВ %# ТМУАСТО ОРЕВАТТОМ С00Е!) 
60 ТО 999 

с РС ПОЛУЧИЛА ЗНАЧЕНИЕ БОЛЬШЕ 99 

666 — МЕШТЕ (РАТ, 66Т/ . 

667  ЕОВМАТ ('0%* ЕВВОВ #* РС УАСИЕ САЕАТЕК ТНАМ 991$ 
60 ТО 999 

с ‚ ПОПЫТКА ДЕЛЕНИЯ НА НОЛЬ 

777 — ИРТЕ СРАТ,ТТВ) 

718 — РОВМАТ ('0%% ЕЯАВАОВ +* ОГУТОЕ ВУ 2ЕВО')} 
64 ТО 999 

С НЕОЖИДАННЫЙ КОНЕЦ, ФАЙЛА 

888 — МА1ТЕ ^(РЯТ, 889) 

889 ЕОВМАТ ('0%* ЕВВОВ ** ОМЕХРЕСТЕО ЕМО-ОЕ-Е11 ЕЙ 

999 — ВЕТОВМ 

ЕМО 


ЗОВВОУТТНЕ ОБОМР 
сх хх жжжжхжжжхкжфх 


$ хх фу 
С* РАСПЕЧАТАТЬ СОДЕРЖИМОЕ ПАМЯТИ ЗАОЗАС И ЗНАЧЕНИЯ 
сх жж ххх жж 
ТМТЕСЕВ (0С1, 40С2 
СОСТСАС ОУЕЕОМ, ТААСЕ 
УНТЕСЕВ МЕМ(100), РС, АС, РАТ, ВОК, ТАС 
СОММОМ/ЗАОЗАС/ МЕМ, РС, АС, РАТ, ВОВ, ТВС, ОУРЕОМ, ТВАСЕ 


ДАМП СОСТОЯНИЯ СИСТЕМЫ 
НАТТЕ (РАТ,10) РС, АС 
10 ЕОВМАТ (ИХИ» 140, '** $АОЗАС ЗУЗТЕМ БОМР №%' // 


зо 


1 116% 'РВОСВАМ СОУМТЕВ=', 13, Т68, 'АССУМИСАТОКа!, 14 /И 
с 2 145, 'МЕМОВУ СОМТЕМТ$* ИИ) 
С ДАМП ПАМЯТИ 
0 20 т =1, 91, 1а 
4 =1!+9 
190561 =1-1 
{0С2 = 1061 + 9 
МА1ТЕ (РВТ,15} (0С1+ (062, (МЕМ(К], К={, 4} 
15 ЕОВМАТ (113; "ЕОСАТТОМ$ *, 12, #-', 12, 10163 
20 СОМТТМОЕ 
ВЕТИАМ 
ЕЮ 
ВЕОСК ВАТА 
Ск у у еуяиуи 
с* И ИнициАлизАЦИЯ ОБЩИХ ОБЛАСТЕЙ: * 
с* = ВСЕ ЯЧЕЙКИ ПАМЯТИ СНАЧАЛА НУЛЕВЫЕ. * 
с* Е = о ЗАПУСК ПРОГРАММЫ С ПЕРВОЙ ЯЧЕЙКИ * 
«<. АС = 0 :СНАЧАЛА В СУММАТОРЕ НОЛЬ * 
с* РАТ = 6 — ЗНОМЕР УСТРОЙСТВА РАТМТЕК 18М 360-370 * 
с* ЖОК = я НОМЕР УСТРОЙСТВА КВЕАОЕВ ТВМ 360- 370 * 
сх ТРС = ‹ ЗНОМЕР УСТРОЙСТВА РАТМТЕВ Т1ВМ 360-370 ж 
С* ОУЕЕОН АСЕ: ВНАЧАЛЕ НЕТ ПЕРЕПОЛНЕНИЯ * 
с* ТААСЕ. = ТВЦЕ: ВКЛЮЧИТЬ ОТЛАДОЧНУЮ ТРАССИРОВКУ * 
С жж фжжж * жж фея & ‚0 Е В № 3 Е: 


СОС1САЁК ОМЕСОН, ТААДСЕ 

ТМТЕСЕК МЕМ( 100); РС; АС, РАТ, КОА, ТАС 

СОММОМ/ИЗАОЗАСИ МЕМ, РС, АС, РАТ, ВОВ, ТАС; ОУЕСОМ, ТВАСЕ 
РАТА МЕМ/100*%0/у РС/О/у АСИО/ 

РАТА РАТ/6/, ВОВ/5/; ТАС/6/;, ТААСЕ/.ТКИЕ./;, ОМЕСОМИ.ЕАЕЗЕ+ / 
ЕМО 
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Упражнения 


7.01. Напишите программу на языке ассемблера ЗАОЗАС, которая читает 
величины А, В и С, выполняет инструкцию Фортрана 


А=((В-С)*(А—С))/(В--С) 
и результат вычисления выводит на печать. 
7.02. Предположим, что мы имеем недорогую модель машины ЗАОЗАС. В этой 
машине выполняется только одна арифметическая операция — вычитание 
(ЗОВ, машинный код операции --5). Операции 2ЕКО, АБО, МОГ и МУ 


в этой машине не реализованы. Имеется еще операция ЭТОК. Операции ГОАО 
в машине нет, но она может быть заменена последовательностью операций: 


ЗТОК ТЕМР 

$ИВ ТЕМР очистили сумматор 
ИВ Х получили —Х 
ЗТОЮ ТЕМР 


ЗОВ  ТЕМР теперь получили 0 
ЗОВ  ТЕМР наконец загрузили Х 


Пользуясь только командами ЗТОК и $ОВ, напишите программу для 
вычисления 


Е=А--2*В—С 


Указание: Прежде чем займетесь данным выражением, составьте про- 
граммы, выполняющие операции сложения и умножения. 


7.03. Рассмотренная нами машина $ЗАОЗАС одноадресная, т. е. в каждой коман- 
де можно обращаться только к одному слову памяти. Некоторые машины 
включают также команды с двумя операндами. В этих командах сумматор 
явно не указывается. Рассмотрим машину, в которой могут выполняться сле- 
дующие команды: 


АОО А,В — Прибавить А к В и результат запомнить в А. 
ЗОВ А,В — Вычесть В из А и результат запомнить в А. 
МОГ А,В — Умножить А на В и результат запомнить в А. 
ОГУ А,В — Разделить А на В и результат запомнить в А. 
МОУ А,В — Переслать содержимое В в А 


Пользуясь этими командами, напишите программу для вычисления 
Х= ((У—7)*(Х—7))/(У-- 7) 


Можно предположить, что Х, Уи 2 определены. Если вам потребуются ячейки 
памяти для промежуточных результатов, назовите их Т1, Т2, .. 

7.04. Напишите программы на языке ассемблера САРЗАС, моделирующие 
каждую из 5 команд, приведенных в упр. 7.03. 


7.05. Напишите программу на языке ассемблера ЗАОЗАС, которая вычисляет 
наибольший общий делитель двух вводимых чисел А и В. 


Глава 8 


ЭФФЕКТИВНОЕ ПРОГРАММИРОВАНИЕ 
С ИСПОЛЬЗОВАНИЕМ СРЕДСТВ 
ОПЕРАЦИОННОЙ СИСТЕМЫ 


В предыдущих главах рассматривались методы программи- 
рования и дополнительные возможности языка Фортран. Главу 7 
мы посвятили структуре ЭВМ и показали, как эта структура мо- 
жет повлиять на фортранные программы. В данной главе мы про- 
анализируем этапы работы ЭВМ между вводом исходной прог- 
раммы и окончанием ее выполнения. 


8.1. Операционные системы 


Первые ЭВМ, созданные в конце 40-х и в начале 50-х годов, 
были по современным стандартам медленными, малыми, для них 
было трудно программировать, неудобно было и прогонять про- 
граммы. Как результат этими машинами пользовалось очень 
ограниченное число людей. Типичные ЭВМ того времени похожи 
на машину ЗАОЗАС из гл. 7. Пользователи программировали на 
машинном языке или на языке ассемблера. Каждый пользова- 
тель сам составлял программы, управлял ходом их выполнения 
и сам собирал результаты выполнения программы. Одновремен- 
но мог работать на машине обычно только один человек. 

Три важных усовершенствования в середине 50-х годов изме- 
нили методы работы с ЭВМ. Первое — создание языков высокого 
уровня, таких, как Фортран и Кобол, и компиляторов для этих 
языков. Применение компиляторов облегчило программирова- 
ние, так что большее число людей стало смотреть на ЭВМ как на 
полезный инструмент для решения своих задач. Второе — бла- 
годаря развитию аппаратных средств быстродействие увеличилось 
в тысячи раз. В связи с этим стали доступными для решения на 
ЭВМ более сложные задачи. Третье — были созданы библиотеки 
программ и подпрограмм, которыми могли пользоваться все, кто 
работал с машиной. Создание библиотек означало, что для извле- 
чения квадратного корня или вычисления синуса уже не нужно 
было писать собственные программы. Такие программы мог на- 
писать кто-то один, поместить их в общую библиотеку, а все 
остальные пользователи могли теперь обращаться к этим про- 
граммам. Эти три важных усовершенствования расширили до- 
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ступ к ЭВМ, но именно поэтому увеличили потребность в машин- 
ном времени. 

Из-за возросших потребностей в машинном времени стало рас- 
точительством вручную организовывать запуск и следить за вы- 
полнением каждого задания. Часто время, затрачиваемое на 
«ручные» операции, превышало время выполнения программы. 
Различие в скоростях между человеком и машиной привело 
к разработке управляющих программ, которые взяли на себя не- 
которые функции по организации работы на машине. Такие про- 
граммы были названы мониторами. Монитор вводил одну или 
несколько программ пользователей; вызывал необходимые ком- 
пиляторы, загрузчики и служебные подпрограммы; передавал 
управление очередной программе пользователя, получая обрат- 
но управление после окончания выполнения программы. Други- 
ми словами, монитор обслуживал пользователей. Последователь- 
ное выполнение заданий под управлением программы монитора 
было названо пакетной обработкой. 

Дальнейшее развитие технологии позволило организовать ча- 
стичное совмещение операций ввода/вывода с вычислениями. 
Операции ввода и вывода, особенно ввод с перфокарт и вывод на 
печать, сопряжены с различными механическими действиями, 
такими, например, как перемещение перфокарт после чтения. 
Скорость, с которой перфокарты могут перемещаться, чрезвычай- 
но мала по сравнению со скоростью работы электронных схем 
ЦП. В связи с тем что выполнение программы, как правило, нель- 
зя продолжить, пока не закончены операции ввода/вывода, ЦП 
во время этих операций в течение длительного времени простаи- 
вает. Такая ситуация потребовала разработки мультипрограмми- 
рования, при котором одновременно в оперативной памяти нахо- 
дилось несколько программ. Поскольку в машине был только 
один ЦП, в каждый момент времени только одна программа могла 
быть активной: другие программы могли, однако, быть готовы 
занять ЦП] в любое время, как только выполнение первой про- 
граммы приостанавливалось в ожидании завершения операций 
ввода/вывода. Поэтому две или даже более двух программ одно- 
временно могли находиться в процессе выполнения; каждая ра- 
ботала, пока другая ожидала завершения операции ввода/вы- 
вода. Таким путем непроизводительное время Ц было умень- 
шено. 

С развитием мультипрограммирования управляющие програм- 
мы-супервизоры превратились из пассивных мониторов в более 
активные программы. При одновременном обслуживании несколь- 
ких пользователей потребовалось управлять распределением 
ресурсов; супервизор следил за тем, кто владеет ресурсами, и 
предоставлял имеющиеся в наличии ресурсы запрашивающим их 
программам. Супервизор, называемый теперь операционной си- 
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стемой, стал ответственным за обеспечение пользователей разде- 
ляемыми и неделимыми ресурсами, включая компиляторы, па- 
мять и устройства В/В. Естественным расширением явилась опе- 
рационная система, которая планирует выполнение программ 
пользователей, обеспечивая тем самым наиболее целесообразное 
использование ресурсов системы. Задание, в котором невелик 
объем ввода/вывода, но интенсивно используется ЦП, можно со- 
четать с заданием, в котором выполняется много операций ввода/ 
вывода. Операционная система стала управлять выполнением 
целой группы программ вместо того, чтобы обслуживать запросы 
одной программы. 

При переходе от режима одиночного пользователя к мульти- 
программной пакетной обработке «личные контакты» с ЭВМ были 
утеряны. Прежде пользователь мог предусмотреть в программе 
прием определенных входных данных с пульта управления, чтобы 
с их помощью изменить ход выполнения программы. Так как ско- 
рости ЭВМ увеличились и появилось мультипрограммирование, 
для машины стало слишком дорогим время ожидания ввода дан- 
ных с пишущей машинки. Растрачивалось также и время про- 
граммиста, поскольку невозможно было предсказать момент, 
когда задание начнет выполняться. 

Активное взаимодействие человека с ЭВМ в процессе вычисле- 
ний желательно при решении многих задач. Применение режима 
с разделением времени обеспечило такое взаимодействие без чрез- 
мерных затрат. Разделение времени — это система, при помощи 
которой многие пользователи одновременно взаимодействуют 
с машиной, причем у каждого создается впечатление, что исключи- 
тельно он один на ней работает. Поскольку ЭВМ оперирует на- 
много быстрее человека, она может обслуживать несколько дру- 
гих запросов за время, затрачиваемое пользователем на ввод 
одного запроса. Для взаимодействия с машиной применяются тер- 
миналы, обычно печатающие машинки или дисплеи с клавиату- 
рой. Некоторые ЭВМ обеспечивают одновременно и пакетную об- 
работку, и разделение времени. 


8.2. Компиляторы 


На современных ЭВМ задачи программируют в основном на 
языках высокого уровня. В связи с этим были созданы различ- 
ные компиляторы для удовлетворения потребностей программи- 
стов, работающих в различных областях. К компиляторам предъ- 
являются следующие требования: 


1. Небольшой размер — для применения на машинах с огра- 
ниченной оперативной памятью. 
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2. Быстрая компиляция — для применения в тех случаях, 
когда высоки потребности в машинном времени или ком- 
пилируется большое число программ. 

9. Широкие возможности обнаружения ошибок и выдачи по- 
нятных диагностических сообщений; особенно полезны в си- 
туациях, когда многие пользователи (например, студенты, 
начинающие изучать программирование) не очень хорошо 
знакомы с исходным языком. | 

4. Быстрота выполнения или небольшой размер скомпилиро- 
ванной программы — желательны, если скомпилирован- 
ная программа должна выполняться неоднократно или 
если для выполнения программы требуется длительный 
период времени. 


Некоторые из перечисленных требований противоречат друг 
другу, и поэтому конкретный компилятор может удовлетворять 
’ одним требованиям за счет других. Компилятор Фортрана уровня 
Н (ВМ) может создавать небольшую и быстро выполняемую про- 
грамму, но сам компилятор громоздкий и медленный. Компиля- 
торы, которые порождают «оптимизированный» код, часто при- 
меняют для компиляции так называемых «производственных» про- 
грамм. Эти программы выполняются многократно. Компилятор 
\УАТЕТУ, с другой стороны, создает относительно неэффективные 
программы, но быстро их компилирует. Он удобен для студенче- 
ской среды, в которой большое количество коротких программ 
выполняется, как правило, только один раз. | 


8.3. Объектный код 


Компилятор обрабатывает исходную программу и преобразует 
ее в последовательность машинных команд. Код, создаваемый ком- 
‚пилятором, называют объектным кодом. Объектный код запомина- 
ется на устройствах вспомогательной памяти. Полученный в ре- 
зультате однократной компиляции объектный код можно длитель- 
ное время хранить и выполнять неограниченное число раз. Если 
размер программы или время ее выполнения значительны, то 
применение оптимизированного объектного кода может дать боль- 
шую экономию машинного времени и памяти. 

Подпрограммы Фортрана представляют собой раздельно ком- 
пилируемые модули и располагаются в памяти отдельно от дру- 
гих подпрограмм. В большинстве вычислительных машин можно 
объединять объектный код вновь скомпилированной подпрограм- 
мы с кодом других, ранее скомпилированных подпрограмм, что 
позволяет при изменениях в исходной программе повторно компи- 
лировать не всю программу, а чаще всего только одну подпро- 
грамму. Это еще один факт в пользу создания модульных программ 
на основе подпрограмм. 
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Объектный код программы можно хранить на вспомогатель- 
ном запоминающем устройстве или выводить на перфокарты. 
В последнем случае колода перфокарт называется объектной 
колодой. Объектная колода может быть представлена на выпол- 
нение иногда совместно с другими программами, написанными 
на исходном языке. Перфокарты служат недорогим средством для 
длительного хранения объектных модулей. 


8.4. Перемещение программ 


Рассмотренные в гл. 7 программы для машины ЗАОЗАС всег- 
да располагались в памяти, начиная с нулевой ячейки. Посколь- 
ку в каждый момент времени только один пользователь работал 
на машине, то это было разумным ограничением. Однако подав- 
ляющее большинство ЭВМ работает в мультипрограммном ре- 
жиме, и поэтому две различные программы не могут обе начинать- 
ся с нулевой ячейки. 

Необходимо также, чтобы библиотечные подпрограммы были 
доступны всем пользователям.Если значительное число отдельных 
подпрограмм одновременно загружается в память, мы не можем 
каждой из них всегда отводить одну и ту же область памяти. 
Если двум подпрограммам были бы отведены перекрывающиеся 
области, то они взаимно исключали бы друг друга и главная про- 
грамма могла бы работать лишь с одной из них. 

Решением этих проблем явилось создание перемещаемого 
кода программ, т. е. такого кода, который можно располагать 
в любых свободных блоках оперативной памяти. 

Рассмотрим, например, команду 


КО2 КЕАО 11$Т 


приведенную во второй ЗАРЗАС-программе в гл. 7 (пятая коман- 
да программы). Если каждая команда занимает одно слово памя- 
ти, то машинный код данной команды попадет в пятое слово. 
Предположим, что программа была перемещена в машине с боль- 
шей памятью. Если она теперь начинается в слове 1001, то коман- 
да КЕАШО будет расположена в слове 1005; если программа на- 
чинается в слове 749], команда КЕАО окажется в слове 7495. 
Отсюда следует, что в команде 


ТОК Кр2 


должна быть ссылка на слово 1005 или 7495 соответственно для 
двух рассмотренных случаев (или на другие слова в зависимости 
от места расположения программы). Начальный адрес програм- 
мы называют ее точкой загризки. Процесс корректировки ссы- 
лок, связанный с изменением точки загрузки программы, назы- 
вается перемещением программы. 


11 № 2043 


306 Гл. 8. Эффективное программирование — операционные системы 


Большинство ЭВМ располагает аппаратными средствами, ко- 
торые помогают перемещать программы. Часто для этого исполь- 
зуется внутренняя ячейка памяти, называемая «регистром пере- 
мещений». Компилятор создает объектный код, в котором все 
ссылки внутри программы вычисляются таким образом, как если 
бы программа начиналась с ячейки ноль. Когда программа рас- 
полагается в памяти, адрес ее точки загрузки заносится в регистр 
перемещений. Каждый раз, когда во время выполнения програм- 
мы встречается внутренняя ссылка, содержимое регистра переме- 
щений прибавляется к адресу, вычисленному компилятором. 


Внешние ссылки — ссылки к точкам, расположенным вне про- 
граммы или подпрограммы, — обрабатываются иначе. Напомним, 
что каждая подпрограмма компилируется отдельно от других 
подпрограмм. Рассмотрим пример обращения из подпрограммы 
ЗОВ| к другой подпрограмме 50В2. При компиляции подпро- 
граммы ЗОВ1Т невозможно предугадать, где будет расположен 
код подпрограммы З9В2 во время выполнения программы: он 
может непосредственно предшествовать коду подпрограммы 
ЗОВ1, непосредственно следовать за ним или оказаться в какой- 
либо удаленной области памяти. Компилятор должен пометить 
те команды внутри подпрограммы ЗОВ1, в которых содержатся 
ссылки на подпрограмму $0В2, чтобы их можно было скоррек- 
тировать для получения истинного адреса, когда обе подпро- 
граммы будут загружены в память. 


Подпрограммы ЗОВ] и $0 В2 можно перемещать несколькими 
способами. Во-первых, при каждом обращении к 5ОВ2 в регистр 
перемещений можно заносить адрес ЗИ В2. При передаче управле- 
ния из 50 В2 на ЗОВ] в регистре перемещений должен быть вос- 
становлен адрес ЗО В1. Второй способ состоит в выполнении ча- 
стичного перемещения, при котором главная программа и ее 
подпрограммы объединяются для создания так называемого «за- 
грузочного модуля». При частичном перемещении необходимо 
вычислить смещение 50 В2 от начала загрузочного модуля и при- 
бавить это смещение к любым ссылкам внутри подпрограммы 
ЗОВ?2. Во время выполнения программы регистр перемещений 
содержит адрес, с которого начинается загрузочный модуль, и 
этот адрес прибавляется к любым ссылкам внутри загрузочного 
модуля. Такой способ позволяет раздельно перемещать подпро- 
граммы до их выполнения. 

Описанные здесь два процесса представляют собой загрузку 
и редактирование связей. Загрузка — это процесс, в ходе кото- 
рого объектная программа располагается в памяти и перемеща 
ется в ней. Редактирование связей — это процесс организаций 
связей объектной программы с теми программными модулями, 
которые она вызывает (или которые ее вызывают), 
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`В предыдущем разделе упоминалось, что подпрограммы пред- 
ставляют собой раздельные перемещаемые модули. Поскольку 
подпрограммы компилируются раздельно, изменение в одной 
подпрограмме или главной программе требует повторной компи- 
ляции только одного, изменяемого модуля, а не целиком всей 
программы. Другим важным достоинством раздельного переме- 
щения является то, что подпрограммы можно загрузить в любые 
свободные области памяти. Посмотрим, как проявляются эти 
полезные свойства при работе с большими программами. 


ОЧТРУТ 


ОРРАТЕ 


Рис. 8.1. Трехфазная программа. 


Рассмотрим программу, основные действия которой могут 
быть разделены на три фазы: (1) инициализация рабочих областей 
и чтение набора начальных данных; (2) чтение и обработка ин- 
формации, изменяющей начальные данные; (3) реорганизация и 
вывод скорректированных данных для последующих сеансов об- 
работки. Каждая фаза независима от других. Программа может 
быть построена в виде «драйвера» (главной программы) и трех 
подпрограмм, которые вводят, корректируют и записывают изме- 
ненные данные. Таким образом, программу можно представить 
в виде дерева, изображенного на рис. 8.1, где МАГМ, ГМРОТ, 
ОРРАТЕ и ООТРОТ — имена соответственно главной прог- 
раммы, подпрограммы ввода, коррекции и вывода данных. 

Если задачи сложные, для хранения всей программы может 
потребоваться большая область памяти. На самом деле размер 
такой программы может превышать размер имеющейся в наличии 
памяти. Даже в том случае, если эта программа уместилась бы 
в оперативной памяти, желательно минимизировать размер тре- 
буемой для нее области, так как во многих операционных систе- 
мах приоритет заданий обратно пропорционален потребности 
в памяти. 

Заметим, что, как только подпрограмма ПМРОТ отработала, 
она больше не нужна в оперативной памяти. Фактически под- 
программы ОРРАТЕ и 1МРУОТ, так же как подпрограммы ЧР- 
РАТЕ и ОСЧТРЧУТ, независимы друг от друга и могут использо- 
вать ту же самую область памяти. Оверлейная структура (струк- 
тура с перекрытием) позволяет размещать такие модули в одной 
и той же области. Что для этого необходимо? Необходимо иметь: 


11* 
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вспомогательную память, такую, как магнитный диск, для хра- 
нения копий всех трех модулей; оперативную память, в которой 
могла бы уместиться наибольшая из трех подпрограмм; подпро- 
грамму супервизора для пересылок модулей по запросам в и из 
оперативной памяти. Будем говорить, что программа, построен- 
ная таким образом, имеет оверлейную структуру, поскольку один 
модуль занимает ту же область, которая ранее была занята дру- 
гими модулями. | 
Предположим, что подпрограммы имеют следующие размеры: 


| МАМ 30к 
[МРОТ 30К ЧРОАТЕ 48К ООЧТРУАТ 32К 


(К — сокращенная запись числа 1024, обычно используется как 
мера памяти ЭВМ. Приближенное значение 1К=1000 служит 
хорошей оценкой при определении размера программы.) Тогда 
для этой программы вместо требуемых 140К слов (30-30--48- 
32)К оперативной памяти при простой структуре с перекрытием 
достаточно иметь память размером только 78К слов (30К для 


т оАтЕ В 
ВЕАОЕВ 2 ЗОВТб УЕЮЕУ 3 АБО 2, ОЕЁЕТЕ 20| |ТОТАЁ 8 РАМТЕ 4 
ТЕЗТ 4 


1МОЕС 5 ООТОЕС 4 
ЕВЕАО 5 АРРЕМО 8 | | ВЕОВС 12 ЕОРАМТ 5 
Рис. 8.2. Структура сложной программы. 


главной программы плюс 38К для наиболышей из трех подпро- 
грамм). Мы говорим о такого типа оверлейной структуре как 
о «древовидной структуре». Главная программа является корнем 
дерева, а все подпрограммы, которые непосредственно вызыва- 
ются из главной программы, — это ее прямые преемники. Су- 
ществует единственный путь от корня к любому другому узлу 
в дереве. Каждый раз, когда подпрограмма находится в памяти, 
все подпрограммы, расположенные на пути от корня к этой под- 
программе, также должны находиться в памяти. 

Оверлейная структура может быть более сложной, чем на при- 
веденном выше рисунке. Например, она может иметь форму, пред- 
ставленную на рис. 8.2 (размеры модулей показаны рядом с их 
именами). 

На этой схеме подпрограмма КЕАРЕК и ее преемники П\М- 
РЕС и ЕКЕАО независимы от подпрограммы ОКТ, которая 
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в свою очередь независима от подпрограмм УЕКПЕУ и ТЕЗТ. 
Объем памяти, резервируемой для этих трех секций, равен наи- 
большей из них (подпрограмма КЕАРЕК и ее преемники). Ана- 
логично для двух преемников подпрограммы ОРРАТЕ можно 
отвести одну область памяти. Заметим, что часть этой области 
делится между подпрограммами АРРЕМО и КЕОК СО. Таким об- 
разом, мы видим, что оверлейная область может сама содержать 
одну или несколько оверлейных подобластей. Вычислим объем 
памяти, требуемый для всей оверлейной структуры, снизу вверх. 
Прежде всего определим размер каждого концевого узла дерева 
(т. е. узла, не имеющего преемников). Затем к размеру каждого 
предшественника концевого узла добавим размер его наиболь- 
шего преемника. Продолжим этот процесс, пока не будет вычислен 
размер памяти для всей структуры. Размеры всех модулей пока- 
заны на рисунке. Область памяти, требуемая для КЕАШЕК, со- 
ставляет 12К; сюда входит размер узла-преемника плюс размер 
самой подпрограммы КЕАРЕК. Объем памяти, необходимый для 
ОРРАТЕ, равен 26К, поскольку ее размер равен 6К, а размеры 
областей двух ее преемников составляют 14 К и 20К соответствен- 
но. Продолжая таким образом вычисления, получим общий объем 
памяти, требуемый для программы с такой структурой. Он ра- 
вен 56К. 

Оверлейные структуры влекут за собой некоторые дополни- 
тельные расходы. Во-первых, необходимо дополнительное время 
для приведения объектной программы к оверлейной форме перед 
ее выполнением. Может понадобиться дополнительная внешняя 
память во время выполнения программы, поскольку должна быть 
сохранена полная копия программы на каких-либо устройствах 
прямого доступа. Так как в ходе выполнения в память могут 
быть вызваны многие модули структуры, потребуется некоторое 
время для их загрузки. Наконец, подпрограмма супервизора, 
управляющая вызовами в оверлейной структуре, требует память 
как для себя самой, так и для своих таблиц. 

Из этих источников дополнительных расходов время, которое 
уходит на создание оверлейной структуры, обычно не имеет боль- 
шого значения, поскольку это одноразовая операция. Требуемая 
область вспомогательной памяти также не вызывает принципи- 
альных затруднений, поскольку емкость вспомогательной памяти 
‚в большинстве ЭВМ обычно намного больше, чем оперативной. 
И наконец, дополнительные затраты, связанные с управлением вы- 
зовами, обычно также не имеют значения, поскольку таблицы 
относительно малы и в ряде ЭВМ оверлейный супервизор не за- 
нимает место в памяти пользователя, а написан таким образом, 
что с одной копией могут работать все пользователи. 

Существенным, однако, оказывается дополнительное время, 
требуемое для обработки вызовов между оверлейными подпро- 
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граммами. Программист должен спланировать оверлейную струк- 
туру так, чтобы минимизировать это время. Если подпрограмма 
ЗОВ] будет часто обращаться к подпрограммам ЗОВ?ЗА и $ОВЗВ, 
то следует расположить ЗОВ2А и ЗОВЗВ вдоль того же пути, так 
чтобы обращение к ним могло выполняться без излишних обме- 
нов в памяти. Другой способ планирования оверлейной структу- 
ры состоит в помещении подпрограммы, используемой несколь- 
кими другими подпрограммами, ближе к корню оверлейного 
дерева, и тогда такая подпрограмма в момент вызова будет уже 
в памяти. 

Отметим; что в зависимости от обстоятельств некоторые сег- 
менты в выполняемой программе могут или не могут быть оверлей- 
ными. Предположим, что какой-то сегмент содержит подпрограм- 
му со следующими инструкциями: 


РАТА /1/ 


=5 

В ряде «диалектов» Фортрана, если переменная Г принимает зна- 
чение 5, то она сохраняет его в последующих обращениях. Од- 
нако в оверлейной структуре, если этот сегмент многократно 
замещается в памяти и затем вновь вызывается, новая копия, 
вызванная с диска, может иметь первоначальное значение 1, 
равное |1. Используя оверлейные структуры, программисты долж- 
ны внимательно следить за тем, чтобы любые значения, которые 
надо сохранить, попадали в общие блоки. Общие блоки распола- 
гают в областях памяти, которые могут быть перекрыты только в 
том случае, когда отпадает надобность во всех данных, содержа- 
щихся в этих блоках. 


8.6. Организация оверлейной структуры в ОЕС-10 


Г МС-10 — это программа, которая создает оверлейные струк- 
туры для ЭВМ РЕС-10. Для программы Е1МС-10 оверлей дол- 
жен быть построен в форме дерева, как это было описано выше. 
Если выполняется подпрограмма, находящаяся в некотором узле 
дерева, то все подпрограммы, расположенные на пути от корня 
до этого узла, также должны присутствовать в памяти. Кор- 
невой узел всегда должен находиться в памяти. 

Для организации оверлейной структуры используются сле- 
дующие ключевые слова: 


]1ОУЕВГАУ — указывает, что должна быть создана оверлейная 
структура. 


ЛАМК 


МОРЕ 
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—щ указывает на окончание определенного узла 


оверлейного дерева. За этим ключевым словом 
может также следовать :имя — любое имя, по- 
средством которого программист мог бы позднее 
сослаться на этот узел (чтобы задать его пре- 
емников). 

указывает редактору на определенный узел де- 
рева, для того чтобы определить других преем- 
ников этого узла. За этим ключевым словом может 
последовать один из трех индикаторов позицин, а 
именно :0, если необходимо вернуться к корню 
дерева; :—п, где п — целое число, если необ- 
ходимо вернуться к п-му предшественнику дан- 
ного узла; или :имя, где имя — какое-либо имя, 
если необходимо вернуться к узлу имя для под- 
готовки его преемников. 


Пользователь перечисляет имена подпрограмм, которые долж- 
ны находиться в каждом узле, и затем выдает команду /1 МК. 
При интерпретации этой команды строится определенный узел 
оверлейной структуры и начинается обработка первого преем- 
ника данного узла. Например, дерево вида 


может быть построено с помощью следующей последовательности 


команд: 


/О\ЕВЕАУ , МАТ МИСТМК 
$1/ЕТМК: ОМЕ 
$] АЛЕТМК 
ГМООЕ:-1 $181/Е1НК 
$1821 МК 
ИМООЕ:ОМЕ $1СИЁТМК 
‚ (МОРЕ: $2/Ь1МК/СО 
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8.7. Организация оверлейной структуры 
в системах 1ВМ 360-370 


Оверлейные структуры в системе РЕС-10 имеют тот недостаток, 
что подпрограмма, которая нужна двум-различным узлам, долж- 
на быть расположена ближе к корню дерева, чем оба этих узла, 
или каждый из этих узлов должен содержать копию подпрограм- 
мы. Если имеется много таких независимых подпрограмм, то 
может получиться очень сложное или чрезмерно громоздкое 
дерево. | 

В системе [ВМ эта проблема решена с помощью мультирегио- 
нального оверлея. Каждый регион представляет собой эквива- 
лент отдельной оверлейной структуры. В структуре, представ- 
ленной на рис. 8.3, МАПМ и $ОВ| или МА[М и $0В2 могут на- 
ходиться в памяти одновременно с любой из подпрограмм ЗОВА, 


ЗОВВ или $0ВС. 


Рис. 8.3. Многорегиональная оверлейная структура. 


Узлы ЗОВА, ЗОВВ и $ОВС могут иметь преемников точно 
так же, как если бы они были преемниками $0В1 или ЗОВ?2. 
Но, поскольку ЗОВА, ЗОВВ и ОВС образуют отдельный ре- 
гион, они фактически становятся преемниками обоих узлов 
ЗОВ1 и $0В2. 

Редактор связей — это программа в системе [ВМ для созда- 
ния оверлейной структуры. При обращении к редактору связей 
используются следующие инструкции: 

ПМ5ЕКТ — объединить один или несколько объектных мо- 
дулей как часть оверлейного узла. За этой инструкцией 
располагаются имена одной или нескольких подпрограмм, 

`которые должны быть частью текущего узла. 

ОУЕЮГАУ — указать редактору связей на определенный 
уровень в оверлейной структуре. Эта инструкция называет 
узел; когда это имя используется в последующих инструк- 
циях ОУЕКВТГАУ, то эти инструкции определяют другие 
узлы на том же уровне, на котором первый узел был пер- 
воначально идентифицирован по имени. Инструкция 
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‚ОУЕКГАУ может также определять узел в качестве 
региона. В этом случае инструкция ОУЕКГАУ имеет 
форму ОУЕКГАУХ имя (КЕСТОМ). 


МАМЕ — дать имя всему загрузочному модулю как програм- 
ме. | 


Предположим вы хотите создать оверлейную структуру, со- 
ответствующую дереву, приведенному на рис. 8.4: 


Регион 


Третий уровень 


Рис. 8.4. Оверлейное дерево. 


Эта оверлейная структура может быть построена с помощью 
следующих инструкций: 


ТМ5ЕВТ МАМ 
ОУЕВЕАУ ОМЕ 
ТМ$ЕВТ ЗИВЕ 
ОУЕВЕАУ ТНО 
1№$ЕВТ $083 
О\МЕВСАУ ТНО 
ТМ5ЕАТ $184 
ОУЕВСАУ ОМЕ 
ТМ5$ЕАТ $082,5$085 
ОУЕВЕАУ ТНВЕЕ(ВЕСТОМ } - 
ТМ$ЕАТ $086 
О\ЕВСАУ ТНВЕЕ 
ТМ$ЕВТ $087 

МАМЕ О\УЕВ5ТК 


Эта последовательность инструкций позволяет создать оверлей- 
ную структуру, соответствующую приведенной на рис. 8.4. 
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РАЗЛИЧИЯ МЕЖДУ ФОРТРАНОМ 4 
И ФОРТРАНОМ 77 


В приложении приведены изменения в языке Фортран, вве- 
денные в версии Фортран 77. Приложение следует рассматривать 
не как полное описание языка Фортран 77, а лишь как перечень 
изменений по отношению к материалу, изложенному в гл. 0. 
Мы не вводим здесь новых инструкций, а только показываем, 
как изменяется синтаксис или смысл инструкций, представленных 
в гл. 0. Правда, с одним исключением. Фортран 77 содержит 
конструкцию Е-ТНЕМ-ЕЁГЗЕ; поскольку в ряде компиляторов 
Фортрана эта конструкция допустима в той или иной форме 
как расширение Фортрана 4, мы приводим описание новой ин- 
струкции ИП". | 

Материал приложения распределен в том же порядке, что и в 
гл. 0 этой книги. Номера разделов в приложении совпадают с 
номерами соответствующих разделов гл. 0. Так что вы можете 
легко найти сноску в приложении каждый раз, когда в гл. 0 
встречается абзац, выделенный жирными точками. 


0.2.1. Формат инструкции - 


В Фортране 77 допустимы пустые строки. Они обрабатыва- 
ются как комментарии (т. е. игнорируются). Комментарии могут 
начинаться или с буквы «С», или с символа «х», звездочка. - 


0.2.2. Типы данных 


Литерные константы в форме Н (иН цепочка) разрешается ис- 
пользовать только в инструкциях ЕОВ МАТ. Литерные констан- 
ты, заключенные в апострофы (’цепочка’), являются теперь 
общепринятой формой. Однако многие компиляторы в целях 
совместимости, по-видимому, будут допускать литерные кон- 
станты типа Н в инструкциях САГ.Т, и АТА. 

Индекс может быть любым разрешенным арифметическим вы- 
ражением; если выражение не относится к типу целых, то зна- 
чение будет усечено для использования в качестве индекса. 
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0.2.3. Операции 


Включены две новые логические операции .ЕШУ. и .МЕЩУ. , 
которые устанавливают соответственно отношение «эквивалент- 
но» или «не эквивалентно». Если [1 и [2 — два логических вы- 
ражения, то (Г1 .ЕФ\У. 12) будет истинно, если и [1 и [2 или 
истинны, или ложны, т.е. .ЕСУ. истинно только тогда, когда оба 
его аргумента имеют одно и то же значение. Выражение ([.1 
.МЕОУ. 1.2) означает то же самое, что и выражение (.МОТ. 
([.1.ЕОУ. Г2)), т. е. (11 .МЕФУ. 1Е2)) будет истинно только 
тогда, когда Е и [.2 имеют различные значения. 

Для работы с литерами добавлена новая операция //. Опера- 
ция // означет конкатенацию, или объединение двух цепочек. 
Если $| имеет значение 'РОС’ и $2 — значение 'НОП$Е”, то 
$1//52 будет иметь значение РОСНОПЗЕ’. Аналогично можно 
расчленить цепочку на части посредством операции ссылки на 
подцепочку. Для указания подцепочки в скобки заключаются 
два выражения, указывающие позиции первой и последней из 
тех литер, которые должны быть включены в подцепочку. На- 
пример, если $3 имеет значение 'РОСНОЦЪЗЕ”, то $3 (1, 3) вы- 
деляет ’РОС’, а $3(4,5)—’НО’. Если ссылка на массив и ссылка 
на подцепочку относятся к одной и той же переменной, то ин- 
дексы массива стоят первыми, т. е. А (1, Л) (К, Г.) — это подце- 
почка от К-й до [.-й литеры элемента в массиве А (1, 7). 


0.3.1. Декларации 


Разрешены переменные типа СНАКАСТЕК. Синтаксис дек- 
ларации СНАКАСТЕК тот же самый, что описан в разд.: 3.8. 
Тип СНАКАСТЕК может быть также указан в инструкции 
МРТ или ЕОМСТЮМ. Во всех трех случаях декларация 
СНАКАСТЕК может иметь вид СНАЮАСТЕЮ&и, где и — целая _ 
константа, определяющая длину цепочки литер. 

Размер массива может быть задан в виде А (а, : 4›), где а, 
и 4.— соответственно нижний и верхний пределы значений ин- 
дексов. Например, ОМЕМЗОМ А(3: 10) объявляет восьми- 
элементный массив, содержащий элементы А (3), А (4), ..., 

(10). 


0.3.1. Инструкции ОАТА 


Значение не обязательно должно быть того же типа, что и 
инициализируемая переменная; преобразование будет происхо- 
дить точно так, как если бы переменная и значение участвовали 
в инструкции присваивания. Можно также инициализировать 
любую часть массива, указав А (1) : А (1,)} в списке переменных. 
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Такая запись означает, что значения должны быть присвоены 
всем элементам массива А, начиная с элемента с индексом | 
и кончая элементом с индексом Го. 


0.5.2. Бесформатный ввод («ввод, управляемый списком») 


Разрешена форма инструкции ввода 
ЮКЕАД (истр-ввода, *) список. 


0.5.3. Бесформатный вывод («вывод, управляемый списком») 


Разрешена форма инструкции вывода 
МУЕГТЕ (устр-вывода, *) список. 


0.5.3, 0.5.6. Бесформатный вывод, форматный \У/КТЕ 


Список переменных в инструкции М/КТЕ может также вклю- 
чать константы и выражения. 


0.6.2. Вычисляемый СОТО 


Индекс вычисляемого СОТО может быть любым целым вы- 
ражением. Если значение выражения больше количества содер- 
жащихся в списке меток инструкций или если это значение не 
положительно, выполнение программы продолжается с инструк- 
ции, которая следует за вычисляемым СОТО. 


0.6.3. Инструкция Е 


Добавлены четыре новые инструкции: 


[Е (выраж) ТНЕМ ЕМО Е 
ЕГЗЕ [Е (выраж) ТНЕМ ЕЁФЕ 


Каждая конструкция -ТНЕМ должна быть связана с соответст- 
вующей инструкцией ЕМО Е. Между 1Е-ТНЕМ и соответствую- 
щей ей инструкцией ЕМО Ш может быть любое количество ин- 
струкций ЕГЗЕ 1Е-ТНЕМ и не более одной инструкции ЕЁ.$Е. 
Указанные группы должны быть правильно вложены, т. е. 
если одна группа Е содержится внутри другой группы Е, тв 
все инструкции первой (вложенной) группы [Е должны находиться 
между [Е-ТНЕМ иЕМО [Е второй (внешней) группы 1Е. Переходы 
в группу Е извне не допустимы. 

Смысл этих конструкций аналогичен описанным вразд. 1.3.2 
конструкциям 1Е-ТНЕМ-ЕЕГЗЕ. 
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0.6.4. Инструкция цикла ВО 


Параметры начальн, конечн и шаг могут теперь быть любым 
целым выражением. «Счетчик итерации» устанавливается перед 
началом выполнения цикла ОО. Его начальное значение — 
МАХО ((( конечн — начальн -- шаг)/шаг), 0). Значение счетчика 
итераций — это число повторений цикла РО; заметим, что счетчик 
может иметь нулевое значение. В этом случае никаких инструк- 
ций в цикле не выполняется. Шаг цикла может быть отрицатель- 
ным. Можно изменить значения параметров цикла во время его 
выполнения. Однако это не повлияет на количество повторений 
цикла, так как счетчик итераций вычисляется прежде, чем тело 
цикла выполнится в первый раз. Нельзя передавать управление 
извне в тело цикла ОО. 


ПРЕДМЕТНЫЙ УКАЗАТЕЛЬ 


Адрес (аЧагезз) 16 

Альтернативные выходы из подпрограммы (а{егпайе ехй$ Нот 
зибргосгаи) 123 

Аргумент функции [см. Параметр] 

Арифметическое выражение (аг(бтейс ехргезз1юп) 18 
Арифметическое и логическое устройство (аг{Нтейс ап@ 1об1са|` 
ипи) 287, 289 

Ассоциированная переменная (аззостайе уагла фе) 210 


Байт (Бу{е) 279 

Бесформатный ввод/вывод (ее Гогта при /ошрий) 28, 159, 194, 
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Бит (Б() 13, 265 

— четности (рагЦу ЪИ) 185 

Блок комментариев — «шапка» (ПеаЧег сотте{5) 69 

— СОММОМ 135 

‚ — — несогласующиеся определения (1соп$1${еп{ 4еНпИ оп) 140 
— — помеченный 141 

Блокирование записей (Б]оск1пя) 186 

Буферизация вывода [см. Спулинг] 


Ввод/вывод (шри/ошри{) 27, 157, 184 

Вещественная константа (геа| соп${ап{) 13 

Возврат из подпрограммы (геигп) 45 

Возвращение результата подпрограммы 52 

— — функции 50 

Восьмеричная система счисления (офа! питБег1ие зуфет) 276 
Временная сложность алгоритма (Ите сотр]ехНу) 93 
Встроенные функции (Би Ш-ш @псИоп$) 48, 314 
Вызов подпрограммы (са]]) 45, 52 

— функции 51 

Выражение (ехргез$1оп) 18 

— вычисление (еуаша оп) 20 _ 

Вычисляемый переход (сотрщей ОТО) 78 
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Генератор случайных чисел (гапдот питбег бепегафог) 146 
— мультипликативный (ти рИсаНуе) 147 

Глобальные данные (51ора| даа) 135 

Голова списка (Веа4 ога 1154) 227 


Дамп (аитр) 81 

Данные (4афа) 265 

Двоичное представление (Ылагу гергезеа оп) 

— — вещественных чисел (оЁ геа! питфег$) 269, 278 

— — — — с двойной точностью (Чон е ргес1$1оп) 275, 278 
— — целых чисел (ог и\есег питЪег$) 

— — — — в дополнительном коде (0$ сотр1етеп{) 267, 277, 


— — — — в обратном коде (опез сотр!етеп) 267 
— — — — в прямом коде ($1юп ап таспЦиае) 266 
Двойное слово (Чоие \хог4) 279 

Декларация (Чебагайоп) 21 

— типа переменной (уапа Бе фуре) 22 

— — — неявная (оп аацИ) 23 

Деление на ноль (41\1$1оп Бу 2его) 271 

Дерево (гее) 245 

— бинарное поиска 246 

—щ сбалансированное (Ба]апсе@) 246 

Диалект языка (апбиаве Фаес?) 12 

Документация внешняя (еж{егпа! ЧоситетаНоп) 66 
— внугренняя (Ифегпа!) 68 

Дополнительные входы в подпрог рамму. (ти ре епё1е$) 125 
Дуга (агс) 245 


Загрузка программы (ргобгат 1оаЧ 115) 306 
Защита от ошибок (а@епз1уе ргоогати!198) 80 


Имя массива (аггау’$ пате) 15 

— переменной (уага Бе) 15 

Индекс массива (зи5сг!рф) 15 

Инструкции (Уа{етеп{$) 

—щ безусловного перехода (ипсопа юпа] БгапсН) 38 
— ввода/вывода (1приоц{ри{) 210, 318 

— вычисляемого перехода (сотрие Бгапсй) 39, 318 
— для работы с дисками 210 

— — — магнитными лентами 193 

— локального управления последовательностью действий (оса| 
сошго| оЁ ехеси оп) 37 
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— неисполняемые (попехеси{а е) 21 

— присваивания (а5$1ептеп{) 26 

— условного перехода (соп@ опа! БгапсВ) 39 
— цикла (Цегайоп, ашботайс 1оор!п5) 41—42 


Кодирование литер (спагас{фег епсо@ 118$) 156 
Коллизия при хешировании (с0111$10п) 130, 151 
Колонка продолжения (сопИпиа Йоп Неа) 13 
Комментарий (соттеп{5) 13, 70 

— заголовок (Беа4ег) 69 

Компилятор (сотр|ег) 12, 304 

— РОКТКАМ-10 12 

— \АТЕЫГУ 12, 168 

Корень дерева (гоо{ оЁ а {гее) 246 


Лентопротяжное устройство (тазпейс {фаре ип) 191 
Лист дерева (|еаЁР оЁ а {гее) 246 

Литера (спагаег) 155 

Литерал (1Шега!) 32 

Литерная константа (спага {ег соп$ап\{) 14, 158 
Логическая запись (10о61са| гесог@) 186 

— константа (овса! соп${ап{) 14 

Логическое выражение (1о61са| ехргезу!оп) 19 
Локальные данные (1оса| Ча{а) 116, 134 


Магнитные диски (таспейс 41$К$) 206 

— ленты (арез) 185 

Маркер конца записи (еп оЁ гесог тагКкег) 188 
— — файла (еп4 ог Ше) 191 

Массив (аггау) 15 

Метка инструкции (1аБе!) 12 

— файла 191 

Методы поиска (зеагсп те о4$) 93, 129 

— сортировки (ог п5) 95 

— — быстрой (диск зогштй) 97 

— — «пузырьком» (БибЪ]е) 96 

Моделирование (5ути]а оп) 251 

— автозаправочной станции 252—255 

— ЭВМ $ЗАОЗАС 295 

Монитор (топКог) 302 

Монте-Карло метод 147 
Мультипрограммирование (ти 1ргоэвгатиитя) 302 
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Неисполняемая инструкция (попехесща]е %а{етеп{) 21 
Неявный цикл (ппрИе4 РО) 28 

Номер инструкции [см. Метка инструкции] 

Нумерация последовательности перфокарт (зедиепсе питфег) 13 


Общий блок [см. Блок СОММОМ] 

Объектный код (об]есЁ соде) 304 

Оверлей (оуегау) 307, 311 

Оглавление тома (УТОС) 208 

Операция (орегаоп5) 

— арифметические (агИбтейс орегафог$) 17 

— замещения (гер|асетег4) 167 

— конкатенации (сопс&епаИоп) 165, 317 

— логические 17 

— над литерами (сВагафег орегаЙопз) 159, 165 
— над стеком (5$аск орегаоп$) 229 

— отношения (га оп орегафог$) 17 

— присваивания (аз ептеп) 26 

— с очередью (ацеице орегаЙопз$) 233 
Операционная система (орега!пе зу$фет) 198, 301 
Определение подпрограммы (5иБргосгат 4ейпИ1оп) 52, 118 
— функции 49 

Отладка программы (4еБизе1пе) 81, 86 
Отладочные инструкции 83—85 

Очередь (ацеие) 232 

— связанная (ПпКе4) 241 


Пакетная обработка (а{сп) 302 

Память оперативная (тат тетогу) 184, 287 
Параметр подпрограммы (агоитеп{) 45, 115 
— — фактический (аиа|) 46, 52, 118 
— — формальный (4итту) 46, 53, 115 
Передача параметров (рагатеег {гап$1115$101) 52, 118 
— — по адресу 120 

— — — значению (Бу уаше) 121 

— — — имени (Бу пате) 119 
Перемещаемый код (ге]осафаЪ]е сое) 305 
Переполнение (оуегЙо\’) 271 

— порядка (ехропепё оуегЙо\) 271 

— стека 231 

Перфокарта (сага) 12 

Поддерево левое/правое узла (зиЪ{гее) 246 
Подпрограмма (5ибргосгат) 44, 115 
Подпрограмма-функция 45—47 
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Полемика с СОТО 75 

Полуслово (паЙ \ог4) 279 

Портативность программы (ромабИу) 76 
Последовательный доступ (зеаиеп а] ассез$) 185, 209 
— список 228 

Потеря порядка (ехропеп{ ипаегПох,) 272 
Правила приоритета операций (ргесе4епсе) 18—19 
Предпроцессор 76 

Представление данных (Чафа гергезеп{а{ оп) 265 
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по программированию и матема- 
тическому обеспечению ЭВМ 


Ахо У., Ульман Дж. Теория синтаксического анализа 
и трансляции. т. 1. 1978. 2 р. 90 к. , т. 2. 1978. 2 р. 40 к. 


Бауэр Ф., Гнац Р., Хилл У. Информатика. Задачи и 
решения. 1978. | р. 30 к.. 


Вайнгартен Ф. У. Трансляция языков программирования. 
1977. То к. 


Гилман Л., Роуз А. Курс АПЛ; диалоговый подход. 
1979. Эр. 10к. 


Гловински Р., Лионс Ж.-Л. Численное исследование 
вариационных неравенств. 1979. 2 р. 50 к. 


Гренандер У. Лекции по теории образов. т. 1. Синтез 
образов. 1979. Гр. 80 к. 

Гристолд Р., Поудж Дж.. Полонски И. Язык программи- 
рования Снобол-4. 1980. 95 к. 


Драммонд М. Методы оценки и измерений дискретных 
вычислительных систем. 1977. | р. 81 к. 


Кнут Д. Искусство программирования для ЭВМ. т. 2. 
Получисленные алгоритмы. 1977. 3 р. 80 к. 


Кнут Д. Искусство программирования для ЭВМ. Т. 3. Сор- 
тировка и поиск. 1978. 4 р. 80 к. 


Коддингтон А. Ускоренный курс Кобола. 1974. 1 р. 18 к. 


Линдси Ч. Неформальное введение в Алгол-68. 1973. [р. 
72 к. 

Маджинис Дж. Программирование на стандартном Ко- 
боле. 1979. 2 р. З0 к. 


Маурер У. Введение в программирование на языке 
ЛИСП, 1976. 92 к, | 


Машины Тьюринга и рекурсивные функции. 1972. 89 к. 


Оллонгрен А. Определение языков программирования 
интерпретирующими автоматами. 1977. | р. 20 к. 


Партхасаратхи Т., Рагхаван Т. Некоторые вопросы тео- 
рии игр двух лиц. 1974. | р. 34 к. 


Пейган Ф. Практическое руководство по Алголу-68. 1979. 
85 к. 


Пересмотренное сообщение об Алголе-68. 1980. 2 р. 60 к. 


Перечислительные задачи комбинаторного анализа. 1979. 
2р. 


Пратт Т. Языки программирования. Разработка и реа- 
лизация. 1979. 2 р. 90 к. 


Психология машинного зрения. 1978. | р. 80 к. 
Розенмюллер И. Кооперативные игры и рынки. 1974. 64 к. 


Сложность вычислений и алгоритмов. 1974. | р. 96 к. 


Холл П. Вычислительные структуры. Введение в нечис- 
ленное программирование. 1978. 95 к. 


Эти книги Вы можете приобрести в магазинах кни- 
готоргов, распространяющих научно-техническую лите- 
ратуру. Если в ближайшем от Вас магазине этих книг 
не окажется, заказ можно направить по адресу: 


121019 Москва, просп. Калинина, 26, п/я 42, Магазин 

№ 200 «Московский Дом книги». 

103031 Москва, Петровка, 16, Магазин № 8 «Техни- 
ческая книга», 

191040 Ленинград, Пушкинская ул., 2, магазин № 5 
«Техническая книга». 

Книги будут высланы наложенным платежом (без 
задатка). 


В издательстве «Мир» выходит 
в свет новая книга 


Мейер Б., Бодуэн К. Методы программирования: 
Пер. с франц. 1981, 44 л., З р. 50 к. 


В монографии французских ученых систематически 
излагаются основные понятия информатики, обсужда- 
ются трудные проблемы методологии программирования, 
дается сравнение известных языков программирования: 
Фортрана, Алгола, РГ./| и др. Изложение сопровожда- 
ется оригинальными упражнениями (с решениями). 

Для профессиональных программистов, желающих 
овладеть современными методами программирования. 
Может служить учебным пособием по языкам программи- 
рования и алгоритмам. 


Если Вы желаете приобрести эту книгу, оставьте в книжном 
магазине предварительный заказ. Своевременное оформление за- 
каза гарантирует Вам приобретение нужной книги. 


В издательстве «Мир» выходит 
в свет новая книга 


Турский В. Методология программирования на ЭВМ: 
Пер. с англ., 1981, 16 л., [р. 50 к. 


Монография написана профессором Варшавского уни- 
верситета и отражает коллективный опыт руководимой 
им Рабочей группы по методологии программирования 
(в ее составе известные специалисты: Н. Вирт, У. Дал, 
Э. Дейкстра, Д. Грис, К. Хоар и др.). Ее предметом 
являются три крупных раздела: фундаментальные кон- 
струкции программирования, модульная структура про- 
грамм.и процесс построения программ. Изложение после- 
довательное, ясное, однако для чтения книги необхо- 
димо иметь навыки программирования. 

Книга предназначена программистам, желающим уг- 
лубить понимание предмета, и будет полезна аспирантам 
и студентам в качестве дополнительного материала к ос- 
новному курсу программирования. 


Если Вы желаете приобрести эту книгу, оставьте в книжном 
магазине предварительный заказ. Своевременное оформление за- 
каза гарантирует Вам приобретение нужной книги. 


Тр 40 к. 
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